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PREFACE 


This  technical  report  is  prepared  by  Paul  F.  Pritchett,  Research 
Associate,  under  the  supervision  of  Dr.  N.  A.  Kheir,  Principal  Inves¬ 
tigator  and  Associate  Professor  of  Electrical  Engineering,  The  Univer¬ 
sity  of  Alabama  in  Huntsville.  The  purpose  of  this  report  is  to 
provide  documentation  of  Electronic  Target  Signal  Generator  (ETSG)  soft¬ 
ware  and  firmware  (software  programmed  on  PROMs). 

This  documentation  effort  is  in  accordance  with  requirements 
specified  in  Delivery  Order  #0009  of  MICOM  Contract  Number  DAAH-01-81-D- 
A006. 

The  authors  acknowledge  with  appreciation  the  assistance  and 
technical  support  of  Don  Dublin,  contract  technical  monitor  at 
MICOM,  Robert  Burt,  Research  Associate,  UAH,  Donn  Hall,  and  Don  Sprinkle 
of  UAH,  and  G.  R.  Loefer,  James  Randolph,  M.  J.  Sinclair,  T.  N.  Long, 
and  C.  E.  Barnett  of  the  Georgia  Institute  of  Technology,  Engineering 
Experiment  Station,  Atlanta,  Georgia. 

The  views  and  conclusions  expressed  in  this  document  are  those 
of  the  authors  and  should  not  be  interpreted  as  necessarily  representing 
the  official  policies,  either  expressed  or  implied,  of  the  U.  S.  Army 
Missile  Command. 
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CHAPTER  ONE 


ETSG  CONCEPT  AND  FUNCTION 


1.0  Introduction 

The  author's  objective  in  this  document  is  to  present  a  comprehensive 
survey  of  the  ETSG  software  and  firmware.  This  study  is  intended  to  pro¬ 
vide  a  reference  for  ETSG  operation  and  to  aid  in  trouble-shooting  and  the 
continued  development  of  the  ETSG. 

Chapter  One  is  a  general  description  of  the  ETSG  with  respect  to  its 
function,  application,  attributes,  and  limitations. 

The  initialization  software  is  examined  in  Chapter  Two.  This  chapter 
contains  a  glossary  of  the  input  data  which  the  system  operator  supplies 
to  the  ETSG.  This  data  consists  of  seeker  parameters  for  the  particular 
seeker  being  simulated,  target  parameters  for  each  target,  and  field  of 
view  background  information.  Flow-charts  and  equations,  are  provided  to 
explain  the  process  by  which  the  Initialization  Processor  (IP)  interface 
variables  are  generated  from  the  input  data. 

After  the  initialization  phase  is  completed  and  the  ETSG  is  in  "run" 
mode,  the  IP  interface  variables  are  manipulated  by  the  target  Central 
Processing  Unit  (CPU) .  The  operations  performed  by  the  target  CPUs  are 
the  topic  of  Chapter  Three.  The  target  CPUs  receive  dynamic  data  from 
the  CDC  6600  via  the  Direct  Cell  Buffer  (DCB) .  Real-time  calculations  are 
performed  on  the  IP  interface  variables  and  the  Direct  Cell  (DC)  interface 
variables.  Real-time  information  flow  is  delineated  in  the  flowcharts 
at  the  end  of  Chapter  Three. 

Appendices  I  through  VIII  contain  a  glossary  of  variables,  programs, 
and  subroutines.  Appendix  IX  is  a  listing  of  the  BASIC  program  used  to 
do  number  base  conversions  and  to  emulate  some  of  the  Internal  processes 
of  the  ETSG.  A  programmed  approach  to  operating  the  ETSG  is  found  in 
Appendix  X.  A  summary  of  commonly  used  MDOS  and  6800  EDITOR  commands 
comprises  Appendices  XI  and  XII  respectively.  Appendix  XIII  is  a  list  of 
all  ETSG  related  program  files  and  the  discs  on  which  these  files  reside. 
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1 . 1  Overview  of  the  ETSG 


The  Electronic  Target  Signal  Generator  (ETSG)  is  a  specialized 
hybrid  computer  which,  when  given  the  proper  initial  and  dynamic  input 
data,  will  generate  an  analog  voltage  which  simulates  the  detector 
output  of  a  variety  of  electro-optical  seekers.  Redeye,  Stinger,  Stinger- 
POST  as  well  as  postulated  electro-optical  threat  seekers  may  be  simu¬ 
lated  with  the  ETSG. 

As  many  as  twenty  sources  of  specified  shape,  size,  spatial  orien¬ 
tation,  spatial  position,  intensity,  and  intensity  gradient  can  be 
created  and  controlled  for  the  simulation  of  a  particular  target/ 
background/ countermeasure  scenario . 

The  sources  may  represent  simple  targets,  complex  targets  made  up 
of  more  than  one  source,  infrared  flares,  and  pulsed  jammers. 

Complex  targets  such  as  aircraft  can  be  constructed  from  five 
sources,  one  each  for  the  fuselage,  canopy,  and  plume,  and  two  sources 
to  represent  the  wings.  These  five  sources  are  assigned  a  single  control 
point  and  a  single  set  of  target  coordinates,  aspect  angle,  and  orien¬ 
tation  angle  are  calculated  and  transmitted  to  the  ETSG  independently 
for  all  five  sources.  The  ETSG  then  uses  this  data  to  fly  the  five 
sources  as  one. 

Two  spectral  bands  are  available  for  source  designation.  Band  one 
is  unipolar  and  band  two  is  bipolar. 

The  ETSG  supplies  independent  outputs  for  each  of  the  two  spectral 
bands.  Output  polarity  may  be  reversed  by  a  hardware  switch  on  the 
final  digital  to  analog  converter  board  which  interfaces  with  the  seeker 
electronics. 

Non-expendable  pulsed- jammers  may  be  designated  as  part  of  a 
complex  target. 

Flare  sources  are  controlled  independently.  Coordinates  are  cal¬ 
culated  by  the  CDC-6600  with  flare  initial  conditions  equal  to  those 
of  the  dispensing  aircraft  and  new  positions  are  calculated  from  aero¬ 
dynamic  drag  equations.  Refer  to  Fig,  1  for  a  functional  block  diagram 
of  the  simulation  subsystems, 


Each  flare  Is  turned  on  by  a  command  from  the  CDC-6600  and  may  be 
recycled  after  the  flare  has  dropped  beyond  the  tracking  field  of  view. 

The  operator's  console  and  display  are  used  to  initialize  the 
simulation  and  to  display  the  dynamic  position  of  the  seeker  field  of 
view  (FOV) .  The  simulation  must  be  initialized  for  seeker,  target,  flare, 
and  pulse-jammer  parameters.  After  initialization  dynamic  target/source 
data  is  transferred  to  the  ETSG  from  the  CDC-6600  via  the  Direct  Cell 
Interface.  With  this  information  the  ETSG  generates  a  memory  map  of 
the  seeker  image  plane.  This  image  plane  is  then  convolved  with  the 
seeker  scan  pattern.  For  scan  patterns  other  than  reticles,  scan 
signals  must  be  supplied  from  a  source  external  to  the  ETSG. 

The  digital  signal  which  results  from  the  convolution  of  the  seeker 
image  plane  with  the  seeker  scan  pattern  is  converted  to  an  analog 
signal,  ripple  filtered,  and  output  as  the  simulated  detector  signal. 

This  signal  passes  through  the  seeker  (bread-board)  preamplifiers 
and  is  processed  to  generate  the  gyro  procession  command. 

The  AD-4  analog  computer  uses  the  procession  command  to  produce 
guidance  commands.  The  CDC-6600  calculates  new  air  frame  coordinates 
from  the  guidance  commands. 

The  CDC-6600  communicates  the  updated  target  image  plane  coordinates 
to  the  ETSG  via  the  Direct  Cell  Interface. 

For  a  more  detailed  description  of  ETSG  hardware  subsystem  refer  to 
"Electronic  Target  Signal  (ETSG) :  Hardware  Development"  written  by 
Robert  Burt,  Research  Associate,  The  University  of  Alabama  in  Huntsville 
(to  appear) . 

Other  documents  containing  information  relative  to  the  ETSG  are 
listed  in  the  reference  portion  of  this  document. 
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CHAPTER  TWO 

THE  INITIALIZATION  PROCESSES  AND  CODES 


2.0  Introduction 

During  initialization  of  the  ETSG,  parameters  which  define  a  given 
seeker  and  particular  targets  are  entered.  The  ETSG  generates  a  reference 
image  which  is  stored  in  Random  Access  Memory  (RAM)  for  each  source. 

The  target  lookup  RAM  is  a  64  x  64  block  of  8  bit  memory  for  each 
target.  The  values  stored  in  RAM  are  normalized  so  as  to  provide  the 
highest  resolution  map  that  the  target  will  require  during  a  given  scenerio. 
This  reference  is  scaled  in  size,  intensity  and  orientation  during  the 
run  to  simulate  the  target  signature  for  various  combinations  of  the  dynamic 
parameters. 

The  flowchart  in  Figure  1  shows  the  main  programs  which  perform  the 
initialization  process.  Each  of  these  programs  is  discussed  individually 
in  the  following  portions  of  this  chapter.  The  input  parameters  used  by 
the  initialization  processor  are  defined  in  Section  2.1, 
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2  .1  Simulation  Initialization  Parameters 

The  input  parameters  for  the  initialization  phase  are  described  in 
Table  I.  The  variables  which  are  internal  to  the  initialization  software 
are  listed  in  Appendices  III  through  VII. 
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Table  I 

SIMULATION  INITIALIZATION  PARAMETERS 


INITIAL  INPUTS 


SEEKER  PARAMETERS 

Type 

FOV 

Blur 

NEFD 

SNR  for  Track 
Reticle  Scan  Rate 
System  Responsivity 

SOURCE  PARAMETERS 
Shape 

Size 

Aspect  Ratio 
Intensity  Gradients 
Spectral  Bands 
Intensity  Polarity 
Programmable  Intensity 
Maximum  Range 
Minimum  Range 

PULSE  JAMMER 

Rep  Rate 
Sweep  Time 
Duty  Cycle 
Period 

FLARES 

Intensity  vs.  Time 


Rosette,  Conical  or  Center  Spun 
Scaled  to  IFOV 
0.5  mrad.  Minimum 
Any  Value 

1  to  1010 

100  rps  +  20  rps 

Any  Value 

Elliptical,  Rectangular,  or 
Triangular 

Any  Size  (Linear  Dimensions) 

1:1  to  32:1 

Programmable 

Any  Two 

Plus  or  Minus 

Complex 

Meters 

Meters 

20  kHz  Maximum 
Scan  Rate  +  20% 

Maximum  50% 

1.6  Sec  Maximum 

20  Seconds  Maximum 
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2.2.1  M68Q0  Diskette  Operating  System  (MDOS) 


The  M6800  Diskette  Operating  System  (MDOS)  is  an  interactive 
operating  system  that  obtains  commands  from  the  system  console.  These 
commands  are  used  to  move  data  on  the  diskette,  to  process  data,  or 
to  activate  user-written  processes  from  diskette. 

In  MDOS,  a  diskette  file  is  a  set  of  related  information  that  is 
recorded  more  or  less  contigously  on  the  diskette.  The  information 
can  be  actual  machine  instructions  that  comprise  a  command  or  a  user 
program.  The  information  can  also  be  textual  data,  object  program  data, 
or  any  of  the  forms  described  in  the  following  discussion  of  file 
name  conventions. 

The  standard  format  for  specifying  file  names,  suffixes,  and 
logical  unit  numbers  is: 

<  file  name  >  .  <  suffix  >  :  <  logical  unit  number  > 

where  the  period  (.)  and  colon  (:)  serve  to  delimit  the  start  of  the 
suffix  and  logical  unit  number  fields,  respectively. 

Logical  unit  numbers  identify  the  drive  that  contains  the  file. 

Sit  ce  each  diskette  carries  with  it  its  own  directory,  different  files 
with  identical  names  and  suffixes  can  reside  on  different  diskettes. 

The  following  is  a  list  of  suffixes  and  the  file  type  specified  by 
each. 


Suffix 

AL 

CF 

CM 

ED 

LO 

LX 

RO 

SA 

SY 


Implied  Meaning 

Assembly  listing  file 
Chain  Procedural  file 
Command  file 
EDOS  -  converted  file 
Loadable  memory  -  image  file 
EXbug  loadable  file 
Relocatable  object  file 
ASCII  source  file 
Internally  -  used  system  file 
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To  initialize  MDOS  power  must  first  be  applied  to  the  EXORciser 
and  to  the  diskette  drive  unit.  No  diskette  should  be  in  the  drive 
while  power  is  being  turned  on  or  off  on  either  the  drive  or  the  EXOR¬ 
ciser.  Once  the  power  is  on,  the  following  steps  must  be  followed: 

1.  EXbug  must  be  initialized  and  configured  for  the  proper  speed 
of  the  system  console.  If  power  has  been  turned  on  for  the  first  time, 
EXbug  initialization  is  automatically  performed  by  the  power-up  interrupt 
service  routine  in  EXbug.  If  power  is  already  on  and  MDOS  is  to  be  re¬ 
initialized,  then  either  the  ABORT  or  RESTART  pushbuttons  on  the  EXORcisers 
front  panel  must  be  depressed  to  initialize  EXbug.  The  prompt  "EXBUG 

V.  R."  will  be  displayed  by  EXbug  indicating  it  is  waiting  for  operator 
input.  "V"  indicates  the  version  and  "R"  the  revision  number  of  the 
EXbug  monitor  in  the  system. 

2.  An  MDOS  diskette  (one  shipped  from  Motorola  or  one  that  has 
been  properly  prepared  by  the  user  must  be  placed  in  drive  zero  The 
door  on  the  drive  unit  must  then  be  closed  in  order  for  the  diskette 
to  begin  rotating. 

3.  The  EXbug  I  command  "MAID"  must  be  entered.  An  asterisk  (*) 
prompt  will  be  displayed  once  MAID  has  been  activated. 

4.  The  MAID  command  "E800;G"  must  be  entered.  This  command  will 
give  control  to  the  diskette  controller  at  the  specified  address.  The 
controller  will  initialize  the  drive  electronics  and  then  proceed  to 
read  the  Bootblock  into  memory.  Once  the  Bootblock  has  been  loaded, 
control  is  transferred  to  it.  The  Bootblock  will  then  attempt  to  load 
into  memory  the  remainder  of  the  resident  operating  system. 

During  ETSG  initialization  the  ETSG  Supervisory  Program  is  executed 
from  MDOS  by  typing  ETSG  and  a  carriage  return  at  the  system  console. 
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2.2.2  ETSG  Supervisory  Program 


The  ETSG  Supervisory  Program  is  the  main  driver  for  all  the  ETSG 
software.  It  initializes  all  hardware  and  controls  the  flow  of  all 
ETSG  software  execution.  The  ETSG  main  driver  calls  the  subroutine, 
CKIN1T,  to  perform  a  hardware  check  and  if  necessary,  hardware  initiali¬ 
zation. 

CKINIT  checks  the  value  stored  in  the  Peripheral  Interface  Adapter 
(PIA)  at  the  extended  memory  address  $CBF8  ($  indicates  a  hexadecimal 
number,  i.e.  base  16).  If  the  value  is  zero,  then  it  is  assumed  that 
a  power  up  restart  has  been  performed,  a  power  failure  has  occurred, 
or  a  hardware  abort  has  occurred.  The  PIAs  initialized  by  CKINIT  and 
the  default  values  for  these  PIAs  are  shown  in  Table  II. 

After  CKINIT  the  ETSG  driver  checks  the  system  error  flag.  Based 
on  this  information  and  the  operator's  response,  a  decision  is  made 
in  reference  to  these  four  options: 

1.  Initialize  new  system. 

2.  Perform  error  restart. 

3.  Restart  with  previous  targets. 

4.  Continue  initialization  process  with  present  system. 

Then  the  initialization  sequence  continues  either  in  the  "auto 
sequence"  or  "manual  select"  mode,  depending  on  the  operator's  pref¬ 
erence.  Each  phase  of  initialization  is  handled  by  a  different  program. 
"Boot"  transfers  control  from  each  program  to  the  other.  The  flow  chart 
in  Figure  2  gives  a  detailed  description  of  the  ETSG  Supervisory 
Program. 

As  one  can  see  from  the  flow  chart  the  next  program  in  the  initiali¬ 
zation  sequence  is  SEEK. 
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TABLE  II  PIAS  TO  INITIALIZE 


PIA  Address 


TPIAS  PIA  $CBAO, 

PIA  $CBA2, 

PIA  $CBA4., 

PIA  $CBA6, 

PIA  $CBAD, 

PIA  $CBAE, 

PIA  $CBB0, 

PIA  $CBB2, 

PIA  $CBB4 , 

PIA  $CBB6, 

PIA  $CBB8, 

PIA  $CBBA, 

PIA  $CBBC, 

PIA  $CBBE , 

PIA  $CBCO, 

PIA  $CBC2, 

PIA  $CBC4 , 

PIA  $CBC6, 

PIA  $CBC8, 

PIA  $CBCA, 

PIA  $CBCC, 

PIA  $CBC#, 

PIA  SCBDO, 

PIA  $CBD2 , 

PIA  $CBD4 , 

PIA  $CBD6 , 

PIA  $CBDB, 

PIA  $CBDA, 

PIA  $CBDC, 

PIA  $CBDE, 

PIA  $CBF8 , 

PIA  $CBFA, 


PIA  Initialization 
Values 

Default 

Values 

$FF, 

$04, 

$00 

$FF, 

$04, 

$00 

$FF, 

$04, 

$00 

$FF, 

$04, 

$00 

$00, 

$04, 

$00 

$00, 

$04, 

$00 

$FF, 

$04, 

$00 

$FF, 

$04, 

$00 

$FF , 

$04, 

$00 

$FF, 

$04, 

$00 

$ff. 

$04, 

$00 

$ff. 

$04, 

$00 

$ff. 

$06, 

$00 

$ff. 

$04, 

$00 

$FF, 

$06, 

$00 

$ff. 

$04, 

$00 

$FF, 

$04, 

$00 

$ff. 

$04, 

$00 

$ff. 

$04, 

$00 

$ff. 

$04, 

$00 

$FF, 

$06, 

$00 

$FF, 

$04, 

$00 

$ff. 

$06, 

$01 

$FF, 

$06, 

$8E 

$FF, 

$04, 

$01 

$FF, 

$04, 

$3E 

$00, 

$00, 

$00 

$00, 

$00, 

$00 

$00, 

$00, 

$00 

$00, 

$00, 

$00 

$FF, 

$04, 

$00 

$FF, 

$04, 

$FF 

12 


TABLE  II  (CONT'D) 


PIA  Initialization  Default 


PIA  Address 

Values 

Values 

PIA 

$CBFC , 

$FF , 

$04, 

$00 

PIA 

$CBFE, 

$FF, 

$04, 

$00 

PIA 

$CEEC, 

$FF, 

$04, 

$00 

PIA 

$CEEE, 

$FF, 

$04, 

$00 

PIA 

$CFF0, 

$0F, 

$04, 

$00 

PIA 

$CEF2 

$0F, 

$04, 

$00 

PIA 

$CEF4, 

$FF, 

$04, 

$00 

PIA 

$CEFB, 

$FF , 

$04, 

$00 

PIA 

$0000, 

$00, 

$00, 

$00 

13 
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2.2.3  SEEK 


SEEK  is  an  interactive  FORTRAN  program  which  reads  the  input  data 
to  define  a  particular  seeker.  Calculations  are  performed  to  determine 
for  the  particular  seeker  if  the  minimum  system  signal,  SMNSY ,  times 
seeker  responsivity ,  ARES,  exceeds  the  minimum  DAC  output  voltage,  VO. 

When  this  condition  is  satisfied,  the  quantities; 

IPBGL  -  Background  Level 
IPNSL  -  Programmable  Noise  Source  Level 
IAC10  -  Analog  Scale  Factor  Adjust 
1B1  -  Exponent  Scale  Factor  Adjust 

MSIGN  -  Exponent  Scale  Factor  Command 

are  calculated  and  stored  in  PIAs  by  the  subroutine  STAOC.  The  information 
stored  by  STAOC  is  utilized  as  DAC  controls  for  the  analog  boards. 

The  seeker  data  is  then  stored  in  a  diskette  file  and  control  is  re¬ 
turned  to  the  main  driver,  ETSG,  via  "Boot." 

The  flow  chart  in  Figure  3  (pages  22-29)  gives  a  more  detailed  account 
of  the  processes  performed  by  SEEK. 

The  "Notes  on  SEEK  Calculations"  at  the  end  of  this  section  is  a  step 
by  step  listing  with  explanatory  notes  of  the  calculations  performed  by 
SEEK. 

The  next  program  in  the  initialization  sequence  is  ETARG. 

Notes  on  SEEK  Calculations: 

♦Indicates  an  input  variable. 

*FOVD  »  F0V1  Field  of  view  side  to  side  (degrees). 

*BLRM  =  F0V2  Blur  diameter  (M  radian) 

BLRR  =  BLRM*0 . 001  Blur  diameter  (rads.). 

DPR  =>  57.2957795  (degree/rad.) 

DPM  *  0.057295775  (degree/m  rad.) 

BLRD  -  BLRM*DPM  Blur  diameter  (degrees) 

NPWN  *  2 

NF0V«IRND  (NPWN*FOVD/BLRD)  Number  of  discrete  points  in  blur  diameter. 

Note:  IRND  is  a  function  which  rounds  floating  point  numbers  to  integer 
values.  It  always  rounds  so  as  to  increase  absolute  magnitude. 

FPPD=NF0V/F0VT  Points  per  degree  in  field  of  view. 
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*TDPC  ”  F0V3  Number  of  degrees  per  eount  for  target  coordinate. 

*IRCSW  Rosette  or  Conscan  switch. 

If  IRCSW  “  1  load  rosette  seeker. 

If  IRCSW  •  2  load  conscan  seeker. 

TCDPC  =  4.0/128.0  Minimum  number  of  degrees  per  count  for  target  coordinate. 

Note  TDPC  2  TCDPC 

if  not,  default  to  TDPC  «  TCDPC. 

FOVTEM  »  TDPC*256  Temporary  variable 
Note:  FOVTEM  Z  FOVD 

TCPPC  *  FPPD*TCDPC  points  in  field  of  view  per  count  of  target  coordinate 
SBLRM  -  NPWN/FPPD/DPM  Scaled  blur  diameter. 

ICPC8  *  FOVTEM/FOVl*256  Number  of  target  coordinate  counts  across  field  of  view. 
Rosette  minimum/maximum  limits. 


NPWN  - 

1 

2 

3 

MINX 

0 

0 

1 

MINY 

0 

0 

1 

MAXX 

63 

62 

62 

MAXY 

63 

62 

62 

*MXSCR 

Maximum  scan 

rate  (Hertz) 

MSCRD  ■  115  Minimum  scan  rate  (Hertz) 

*RNEFD(ICH)  »  RESP  (ICH,2)  Noise  equivalent  flux  density  (watts/cm2) 

Note:  ICH  is  the  channel  number  1  or  2. 

*SNRT  (ICH)  »  RESP  (ICH, 5)  Minimum  signal  to  noise  ratio  to  track. 

2 

*BKRD  (ICH)  "  RESP  (ICH, 3)  Background  intensity  at  aperture  (watts/cm  ) 

*ATTN  (ICH)  »  RESP  (ICH, 4)  Atmospheric  attenuation  coefficient  (1/Km) 

ANOIZ  (ICH)  -  RNEFD  (ICH)  *  ARES  (ICH)  Programmable  noise  level 

SIGMN  (ICH)  »  RNEFD  (ICH)  *  SNRT  (ICH)  Minimum  signal  at  aperture 

*If  NFSC  (ICH)  -  1  scale  to  NEFD. 

If  NFSC  (ICH)  i*  1  then  input: 

2 

*SIGMN  (ICH)  -  RESP  (ICH, 7)  Minimum  system  signal  at  aperture  (watts/cm  ) 
SMNSY  »  SIGMN  (ICH)  Minimum  system  signal  at  aperture 

2 

SMXSY  =  DYNRNG*SMNSY  Maximum  system  signal  at  aperture  (watts/cm  ) 

VMIN  -  SMNSY  *  ARES  (ICH)  Minimum  detector  voltage. 

C2  «  VMIN/VO  Seeker  volts  to  DAC  volts  scale  factor. 

Note:  VO  ■  6.1  E  -  4  Minimum  DAC  voltage 
CO  »■  64  Seeker  irradiance  to  FNS. 

CM2PM2  -  1.0  E  -  4  Cm2/m2 


C5(ICH)  =  C0*CM2PM2/SMNSY/NPWN/NPWN 
Note:  C2  =  VMIN/VO  >  1 


RL0G2  “  ALOG  (2.0) 
RL218  =■  0.8480 


Note: 


log(X) 
log (2) 


=  log2(X) 


MSIGN  =  1 


Note:  In  STAOC  MSIGN  is  tested  to  determine  if  add  to  exponent  occurs. 
If  VMIN/VO  =  1  then; 


IB1  =  0 


IAC10  =  1023 


AT 2  “  1.0 


If  VMIN/VO  >  1  then; 

T1  =  ALOG(C2) /RLOG2 
Note:  T1  =  log2 (VMIN/VO) 

IT1  =  T1 

Note:  Change  real  to  integer 
FT1  =  T1  -  IT1 


If  FT1  5:  0.8480  then; 

IB1  =  IT1  +  M51GN 
I AC 10  =  1023 

AT2  -  POWER  (2.0,  FT1) 
Note:  POWER  (a,x)  =  ax 

If  FT1  >  0.8480  then 
IT1  =  IT1  +  MSIGN 
IB1  =  IT1 
FT2  =  FT1  -  1 
AT2  -  2FT2 
DZ  =  AT2*1024 
IAC10  =  IRND  (DZ) 


If  IAC10  2:  1024  then; 

I AC 10  =  1023 
IB1  -  IT1  +  MSIGN 
IAC10  -  1023 
AT 2  »  2FT1 
VBGMX  “10.0 

VBGAB  -  BKRD  (ICH)  VBGMX*16383 
IPBGL  -  IRND  (VBGAB) 
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If  IPBGL  >  16383  then  IPBGL  -  16383 
VNZAB  -  VMIN/VNZMX*255 
IPNSL  *  IRND  (VNZAB) 

If  IPNSL  >  255  then  IPNSL  -  255 
ISKRCK  »  IFLAGS  (22) 

ISKRCK.  =  10  *  (BLRM  +  FOVD) / (ARES (1) *SIGMN(2)  +  ARES(2)  *  SIGMN(l)) 

Analog  Scale  Factor  Adjust  IAC10 
T1  =  log2(SNRT*RNEFD*ARES/6. IE-4) 

IT1  =  T1 

Note:  Real  to  integer 
FT1  =  T1  -  IT1 

Note:  Truncate  whole  number. 

FT2  »  FT1  -  1 
IAC10  »  2FT2  *  1024 
If  IQC10  Z  1024 
then  I AC 10  -  1023 
Stored  at: 

CBCA 

CBC8  for  J  channel 

CBBA  for  K  channel 

CBB8 

If  Ftl  ig,  RL  218  *  0.8480 
then  IAC10  -  1023 

Background  Level  IPBGL 
IPBGL  =  IRNb  (BKRD/i0. 0*16383) 

If  IPBGL  "16383  then 
IPBGL  =  16383 

AND  High  byte  with  $3F 
EOR  High  byte  with  $3F 
EOR  Low  byte  with  $FF 

Store  at: 

CBCE  for  K  channel 

CBCC 

CBBE  for  J  channel 

CBBC 
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J 


Note:  Subroutine  CBV  in  STAOS  reorders  the  bits  to  compensate  for  a 
hardware  design  problem. 


Exponent  Scale  Factor  Adjust  IB1 
IB1  =  16  *  /  In  ( RNEFD*SNRT*AR£S/6. IE  -  4) +  1 

V 

AND  with  $F0 
Store  at: 

CBBO  for  J  channel 

CBB4 

CBC4  for  K  channel 


Exponent  Scale  Factor  Command  MSIGN 


MSIGN  =  1 

CBB2/20  for  J  channel 

CBB6/20 

CBC6/20  for  K  channel 


Programmable  Noise  Source  Level  IPNSL 
IPNSL  =  IRND(SNRT*RNEFD*ARES/5*255) 

If  IPNSL  >  255 
then  IPNSL  =  255 

CBC2  for  K  channel 

CBCO  for  J  channel 
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New  or  Default  Seeker 
for  previously  created  seekei^' 


nr  Default  ggfJnejr 


Previously  created  seeker 


Figure  3  :  SEEK 


Figure  3  (Continued) 
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3 


4 


f - ; — - 

Cannot  represent  total  FOV  with  current  data. 


Figure  3  (Continued) 


2 


Figure  3  (Continued) 
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Set  Rosette  Min/Max 
limits  for  run  time  error 
flags. 


Figure  3  (Continued) 
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Input  seeker  static 
parameters . 


Figure  3  (Continued^ 
27 


2.2.4  ETARG 


The  interactive  FORTRAN  routine  ETARG,  controls  the  generation  of  all 
simple  and  complex  targets.  ETARG  specifics  which  targets  are  flares  or 
pulsed  jammers  and  also  assigns  target  channels  and  polarities. 

The  general  information  flow  in  ETARG  is  depicted  in  the  flowchart 
in  Figure  4  (see  pages  32-38) .  A  detailed  account  of  the  values  calculated 
in  ETARG  is  presented  in  the  "Notes  on  ETARG  Calculations"  at  the  end  of  this 
section. 

Notes  on  ETARG  Calculations: 

*  Indicates  an  input  variable 

*  TSZX  *  TRG(l)  Target  size  X  (meters). 

*  TAR  -  TRG  (3)  Target  aspect  ratio. 

If  TAR  -  0  then  TSZY  -  TSZX/TAR. 

If  TAR  =  0  then 

*  TSZY  =*  TRG2  Target  size  Y  (meters)  . 

and 

TAR  -  TSZX/TSZY 

TAR  >  1 

*  ISC  *  IFLAGS  (3)  Channel  number 

*  IPOLTY  -  1 

If  ISC  -  2  then 

*  IPOLTY  *  +  1  or  -  1  for  UV  targets. 

*  RJT  -  TRG  (4)  Target  radiance  (watts/steradian) 

TATTN  »  ATTN  (ISC)/1000  Atmospheric  attenuation  coefficient  from  SEEK. 

RJTP  =  RJT  -  BKRD(ISC)*10000*EXP (TATTN) 

RJTP  »  RJTP*IPOLTY  Contrast  Radiance  (watts/steradian) 

RJTP  2  0 

RT  -  RJT/SIGMN  (ISC)/10000 

RT  -  SQRT  (RT)  Clear  air  track  range  (meters) 

*  RMAX  *  TRG(7)  Maximum  target  range  (meters) 

DYNRNG  -  3.57E9 
TATTN  -  -ATTN  (ISC) /1000*RMAX 

SMNT  -  RJTP*EXP (TATTN)  Minimum  target  signal 

SMNT  -  SMNT/RMAX/RMAX/ 10000 
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SMXSY  -  DYNRNG*SIGMN(ISC)  Maximum  system  signal. 

AGS  =  SMNT/Sr -IN(ISC) 

AGS  >  1 
T1  =  TSZX 
IMAX  =  64 

PPM  =  (IMAX-D/Tl  Points/meter  in  TLR 

*If  the  target  is  not  a  plane,  ITSW  2.5, 

then: 

T1  =  TSZY*TSZY/4  +TSZX*TSZX 
and  PPM  «  (IMAX  -  1)/SQRT(T1) 
otherwise : 

RCO  =  TSZX/BLRM*1000 

RC1  =  TSZX/BLRM*1000*NPWN/(NPWN  +  1) 

RC2  »  TSZY/BLRM*1000*NPWN/(NPWN  +  1) 

RMNR  =  BLRM/NPWN/PPM*1000  Range  of  1  to  1  resolution,  (meters) 

*RMIN  =  TRG(8)  Minimum  target  range  (meters). 

TAX.TN  =  -  ATTN  ( ISC)  / 1000*  (RMAX-RMIN) 

SMXV  =  SMNT*  EXP ( TATTN) 

SMXV  =  SMXV*RMAX/RMIN*RMAX/RMIN 
ZA  =  SMXSY /SMXV 

If  ZA  Z.  1  System  will  overflow 

ZA  2.  128  Probable  overflow 

ZA  2.  1608. 5  Possible  overflow 

ZA  1608.5  No  overflow 

RKMX  =  599.0/PPM  Maximum  value  for  key  points  (meters). 

*RKXM  =  TRG(5)  X  key  point  (meters). 

*RKYM  =  TRG(6)  Y  key  point  (meters). 

*ITCLR  *  I  FLAGS (10)  Target  color 

*ISRVT  =  IFLAGS(ll)  True  target  flag 

*IPJ  =  IFLAGS(5)  Pulse  jammer  flag 

*IFL  =  I FLAGS (6)  Flare  flag 

If  IPJ  =  1  then  ISYF(4)  =  1 
*IPRI  from  STTP  Target  priority 

ID6  -  IPRI  +  6 
ISYF  (ID6)  =  0 
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If  IFL  -  1  then 
ISYF(5)  =  1 

and  ISYF(6)  =  ISYF(6)  +  1 

and  ISYF  (ID6)  =  1 

Clear  intensity  accumulators: 

ZSUM(4)  =  0 
ZCNT(4)  =  0 
PMX(4)  =  0 
PMN(4)  -  5.0E10 

Set  point  target  view 
CST  =9.0 

Note:  INVERT  is  a  function  which  converts  floating  point  numbers  to  the 
ETSG  internal  Floating  Point  Number  System  (FNS) . 

ITMP  =  INVERT (CST) 

This  number  goes  to  the  point  target  lookup  RAM. 

RL0G2  =  AL 0G(2.0) 

RFAVG  =  ZSUM(4)/ZCNT(4) 

PAVG  =  RFAVG/9.0*PMN(4) 

PMX(4) ,  PMN(4),  and  PAVG  are  output  at  the  console  during  initialization. 

Equations  for  initialization  interface  variables  listed  below  may  be  found  in 
Appendix  II. 

RRAN 

ISFR 

ISFP 

AL2E 

FOVS 

ACSF 

PTSS 

TGT1 
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Figure  4:  ETARG 
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Save  targets. 


- $- 

Process  intensity 
information 


/ 


Output : 

PMN ,  PMX,  PAVG 


_ ± _ 

Load  aspect  RAMs, 
target  CPUs,  and 
display  CPU. 


_ ifc - 

Load  target  CPU: 
IP  interface 
variables. 


Load  display  CPU 


TGT1. 


Figure  It  (Continued) 


Figure  A  (Continued) 
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2.2.5  PULSEJ 


PULSEJ  is  a  FORTRAN  program  which  generates  the  time  history  for  a 
given  pulsed  jammer.  The  pulsed  jammer  is  defined  by  the  following  input 
parameters: 

NPULSE  -  number  of  pulses 
PDUTY  -  duty  cycle  (%) 

SFREQ  -  start  spin  frequency 
EFREQ  -  end  spin  frequency 
STIME  -  sweep  time 

The  pulsed  jammer  time  history  is  generated  by  an  iterative  process 
which  increments  time  by  a  factor  which  is  the  reciprocal  of  the  current 
spin  frequency.  For  each  cycle  the  number  of  strobe  "on"  and  strobe  "off" 
points  is  calculated  and  stored  In  memory.  The  strobe  time  history  is 
recorded  in  32K  bits  of  memory.  Since  the  strobe  "on/off"  flag,  JSIG, 
is  a  FORTRAN  integer,  64K  bytes  of  storage  is  required. 

Notes  on  PULSEJ  Calculations 
*  denotes  input  variable. 

*  NPULSE  Number  of  pulses 

*  PDUTY  Duty  cycle  (per  cent) 

*  SFREQ  Start  Spin  Frequency(Hertz) 

*  EFREQ  End  frequency  (Hertz) 

*  STIME  Sweep  time  (Seconds) 

SFREQ  >  64 
EFREQ  >  64 

If:  (2*SFREQ*NPULSE-SFREQ>(2*PDUTY/100)  >  1000  then  frequency /NPULSE  is 
too  high  or  PDUTY  is  too  low. 

DT  =  1.0/32767  (cycle/bits) 

DT  is  a  scale  factor  which  is  used  to  divide  sweep  time  into  32K  bits. 

DUTY  =  PDUTY/ 100.0 

Converts  %  to  fractions  of  a  cycle. 


39 


SRATE  =  (EFREQ-SFREQ) / STIME 

Average  change  in  frequency  per  unit  time. 

NPARTS  =  2*NPULSE-1 

Number  of  parts  in  strobe  history. 

TIME  =  0  Initialize  time  to  zero. 

CFREQ  =  SFREQ  +  SRATE*TIME  Current  frequency  at  any  given  point  in  time. 
CT  =  1.0/CFREQ  Current  spin  cycle  time 

NPTS  =  CT*DUTY/DT  Strobe  time  per  given  cycle  multiplied  by  total  number 
of  points. 

MPTS  =  (NPTS/NPARTS)  +0.5  The  number  of  points  that  the  strobe  is  "on" 
per  spin  cycle. 

When  JSIG(IP)  =  0  strobe  is  "off" 

When  JSIG(IP)  *  1  strobe  is  "on" 

NPTS  =  CT* ( 1-DUTY) /DT  The  number  of  points  that  the  strobe  is  "off"  per 
spin  cycle. 

TIME  +  CT/2  -  STIME  SO  Test  to  see  if  sweep  time  has  been  used  up. 

Refer  to  Fig.  5  for  a  functional  diagram  of  the  PULSEJ. 


START 


1 
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Figure  5  (Continued) 


5 


Figure  5  (Continued) 
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2.2.6  FLARE 


FLARE  initializes  the  flare  time  history.  The  time  history  is  entered 
as  up  to  twenty  pairs  of  intensity  and  time  data.  One  time  history  is  used 
for  all  sources  designated  as  flares,  but  each  individual  flare  may  be 
activated  independently.  The  specified  pairs  of  time  and  intensity  data 
are  processed  by  the  target  CPUs  to  update  the  flare  absolute  intensity 
during  each  frame.  Refer  to  Fig.  6  for  a  functional  diagram  of  the  FLARE. 
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Initialize  console  and 
communication  lines 


Read,  N,  number 
of  points 


Input : 

T(I),  number  of  cycles 
P(I),  %  intensity 


Generate  flare 
time  history. 


IESY  exist? 


Load  target 
CPU  with  flare 
history. 


"Boot" 

ETSG 


Figure  6  (Continued) 


2.2.7  RUNETSG 


RUNETSG  transfers  control  from  the  initialization  processor  to  the 
E'fSG  Hardware.  It  is  the  last  program  in  the  initialization  sequence. 
Refer  to  Fig.  7  for  a  functional  diagram. 
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Figure  7  :  RUNETSG 
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Figure  7  (Continued) 


CHAPTER  THREE 

REAL-TIME  COMPUTER  MODEL  (TARGET  CPU  SOFTWARE) 


3.0  Introduction 

Target  CPU  Driver,  TCD  is  the  main  driver  for  the  ETSG  target  CPU.  Its 
primary  purpose  is  to  generate  the  coordinate  values  and  step  sizes  for  the 
target  loaders.  For  the  derivations  and  memory  locations  of  target  coordinate 
values  and  initialization  interface  variables  calculated  by  the  target  CPU 
code  refer  to  Appendices  One  and  Two  respectively. 

TCD  has  three  modes  of  operation,  RUN,  DEBUG  with  PRESET,  and  DEBUG. 

RUN  Mode 

While  operating  in  RUN  mode,  the  target  CPU  is  fulfilling  its  primary 
purpose.  It  is  generally  in  this  mode  while  the  ETSG  is  running.  While 
in  this  mode,  it  will  use  the  dynamic  variables  supplied  by  the  DCB,  the 
static  variables  supplied  by  the  IP,  and  some  internal  variables  kept  by 
*TCD*  and  generate  the  target  loader/intensity  factor  output  values. 

The  steps  involved  are: 

1.  Wait  till  data  is  supplied  by  the  DCB. 

2.  Generate  intensity  scale  factor. 

3.  Generate  target  loader  values. 

4.  If  target  still  valid  (inside  FOV,  no  intensity  factor  overflow, 
and  target  valid  from  DCB),  load  calculated  values  into  latches. 

If  target  invalid,  set  target  to  point  target  outside  FOV. 

5.  Go  to  step  1. 


DEBUG  with  PRESET 

If  the  debug  target  flag  is  set  to  1,  the  target  CPU  will  enter  this 
mode  of  operation.  While  in  this  mode,  the  CPU  will  set  the  static  vari¬ 
ables  usually  set  by  the  IP,  preset  all  necessary  local  variables,  and 
set  up  a  block  of  memory  for  use  of  the  debug  target.  The  target  CPU  then 
enters  the  debug  target  mode. 

DEBUG  Target  Mode 

While  in  debug  target  mode,  the  actions  of  the  target  are  directed 
by  a  block  of  memory.  This  block  consists  of  9  different  variables: 

1,  2)  A  rotation  angle  increment  and  period.  These  two  numbers  allow 
the  target  to  rotate  CW  or  CCW  at  any  desired  speed. 


3,. 4)  A  range  decrement  and  period.  These  two  numbers  allow  the 

target  to  *zoom*  in  and  out  (i.e.,  appear  to  grow  and  shrink) 
at  a  selected  speed. 

5)  A  range  overshoot  limit.  As  the  range  decrement  value  is  usually 
positive,  and  the  algorithm  involved  does  not  check  for  negative 
ranges,  it  will  appear  that  the  target  has  flown  through  the 
viewer.  This  value  places  a  negative  limit  on  the  range. 

6,  7)  An  aspect  increment  and  period.  These  two  allow  the  targets 
aspect  value  to  change  with  any  desired  rate  and  direction. 

8)  A  delay  factor.  This  value  is  a  delay  to  be  placed  at  the  end 
of  any  cycle.  (Normally  0) 

9)  The  control  byte.  This  is  the  value  that  the  DCB  would  usually 
place  in  the  control  byte  at  address  7.  It  contains  the  go  flag, 
the  flare  flag,  and  an  invalid  target  flag. 

The  steps  involved  are: 

1)  Delay  for  delay  factor  time. 

2)  If  time  period  exhausted  for  rotation,  change  rotation  angle  by 
indicated  amount. 

3)  If  time  period  exhausted  for  range,  change  range  by  indicated 
amount . 

4)  If  range  is  negative  enough,  reset  range  to  positive  value. 

5)  Ditto  for  aspect  angle.  If  aspect  angle  went  through  edge  value, 
change  rotation  by  180  degrees. 

6)  Set  control  byte  to  specified  value. 

7)  Pretend  to  be  RUN  mode  target. 
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3.1  Target  CPU  Code 

The  following  is  a  listing  of  the  subroutines  which  constitute  the 
target  CPU  software.  A  brief  description  of  each  subroutine's  function  is 
presented.  Those  variables  operated  on  by  each  subroutine  are  designated 
as  "Entry"  and  those  calculated  are  labeled  "Exit."  At  the  end  of  this 
section  is  a  flow  chart  which  shows  the  interaction  between  these  sub¬ 
routines. 

TCD  -  Target  CPU  Drive  -  TCD  provides  the  main  line  processing  and  start 
for  the  ETSG  Target  CPUs. 

PRS  -  Preset  -  PRS  clears  all  necessary  internal  variables  to  allow  for 
correct  initialization  processor  interaction.  It  will  also  remove  the  target 
from  the  field  of  view. 

Exit  (VALD)  =  0,  Not  Valid 

(DBUG)  =  0,  Not  Debug 

(CONT)  =  0,  Just  in  Case 
(ERRF)  «  0,  No  Errors  Encountered  Yet 
(CYCL)  =  0,  No  Cycles  Finished  Yet 
Target  outside  of  field  of  view 

INT  -  Initialize,  Preset,  and  Wait  for  Go  -  INT  sets  all  variables  to  correct 
assumed  values  and  waits  for  a  go  signal  from  the  DCB. 

Entry  (VALD)  *  Valid  Target  From  IP 
(DBUG)  «*  Debug  Target  From  IP 
(FS)  =  Flare  Status 

FS  «  0,  Flare  Turned  Off 

=  1,  Flare  Turned  On 

«  FF,  Flare  Turned  Off  by  Program 
Exit  Go  Signal  Cleared.  Flare  Pointer  Set  If  Flare  Turned  On 
Calls  IFH 

RCK  -  Check  Point  Target  -  RCK  determines  whether  or  not  the  target  is  a 
point  target.  It  also  calls  on  L2R  to  calculate  the  range. 

Entry  (RRAN  ,  RRAN  +  1)  -  Resolution  range  (2  Bytes) 

(RRAN  ,  RRAN  +  1)  -  Current  Range  (2  Bytes) 

Exit  (PT)  •  00,  If  not  a  point  target 
01,  If  point  target 
(LR)  »  Log  Base  2  (Range) 
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!► 


Uses  A,  B 
Calls  L2R 

IFH  -  Initialize  Flare  History  -  IFH  Sets  the  pointers  for  the  flare  history 
array . 

Exit  -  (RC)  =  Repeat  count  for  first  value 
(ST)  =  Step  for  first  point 
(IX)  =  Pointer  for  first  point 
(LS)  =  Current  log  output  value 
(TS)  =  (LS) 

Uses  A,  X 

L2R  -  Log  Base  2  of  the  Range  -  L2R  computes  the  log  (Base  2)  of  the  target 
range.  The  algorithm  is  as  follows. 

1.  Find  the  largest  bit  set — this  is  the  power  of  two  for  the  number 

2.  Extract  the  next  6  bits,  these  are  used  as  a  fractional  log.  This 
entails  a  64  byte  lookup  table 

Entry  (RANG,  RANG  +  1)  =  Range 

Exit  (LR  +  0)  =  Interger  (Log  2  (Range)) 

(LR  +  1)  =  Fractional  (Log  2  (Range)) 

Uses  A,  B,  X,  TO,  T1 

ISF  -  Calculate  Intensity /Range  Scale  Factor  -  ISF  calculates  the  basic 
intensity/range  scaling  factor.  The  ISF  is  determined  by  the  following 
equations : 

1.  For  resolved  targets:  ISF  =  EXP  (-ALPHA*RANGE) 

2.  For  half-resolved  targets:  (Unimplemented)  ISF  -  EXP(-ALPHA*RANGE) / 
RANGE 

3.  For  unresolved  targets:  ISF  -  EXP(-ALPHA*RANGE)/RANGE**2 

In  addition  to  the  range  scale  factor, flares  have  a  time  loss  factor. 

All  calculations  are  based  on  the  log  (base  2)  of  the  range.  Conversion 
from  logs  to  the  ETSG  Floating  Point  Number  System  (FNS)  is  trivial  because 
the  log  is  the  FNS  number  to  the  first  three  bits,  which  is  all  that  is  necessary. 
Entry  -  (ALZE)  =»  Log2(E)*ALPHA 

(ISFR)  «  Implied  bias  if  resolved 
(ISFP)  ■  Implied  bias  if  point  target 


55 


Exit  (ISFO)  =  ISF,  FNS 
Uses  A,  B,  X,  TO-  Tl,  T2,  T3 
Calls  TSF 

TSF  -  Time  Scaling  Factor  -  TSF  calculates  the  time  scaling  factor.  This 
is  the  value  by  which  the  TSF  is  to  be  decremented  due  to  time  (for  flares) 
Entry  (RC)  =  Repeat  Count  for  current  LS  value  (ABPO) 

(ST)  =  Current  Sine  Term  (for  corrections)  (APBO) 

(LS)  -  Log  Scale  Value  (ABP8) 

(TS)  =  Log  Scale  Value  (Corrected)  (ABP10) 

(IX)  =  Current  Flare  Index  (into  table) 

Exit  -  All  above  values  updated 

(A,  B)  =  TSF  Value.  (ABP8) 

Uses  A,  B,  X,  T4,  T5 

CAV  -  Calculate  Aspect  Values  -  CAV  sets  the  X  key  point  depending  upon 
the  current  value  of  the  aspect  angle  and  determines  the  correct  aspect 
ratio  RAM  to  use.  It  will  perform  a  table  look  up  in  TKPT  to  find  the 
correct  value  of  the  keypoint. 

Entry  -  (ASPC)  »  Aspect  Angle 

(PLUM)  *  Complex  Target  Flag 
(PT)  »  Point  Target  Flag 
Exit  -  (XK)  =  X  key  point 
(YK)  =  Y  key  point 
Uses  TO,  Tl,  T2 ,  T3 

CXY  -  Calculate  X  and  Y  Coordinates  -  CXY  calculates  the  X  and  Y  coordinates 
of  the  keypoint  for  the  TLR.  This  coordinate  is  just  the  Azimuth  and 
elevation  scaled  upward  by  a  predetermined  scale  factor 
Entry  (AZIM)  =  Target  Azimuth 

(ELEV)  =  Target  Elevation 

(ACSF)  =  Elevation/Azimuth  Scale  Factor 
Exit  (XC,  XC  +  1)  =  X  Coordinate  ABP5 

(YC,  YC  +  1)  =  Y  Coordinate  ABP5 

Uses  A,  X 
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CSS  -  Calculate  Step  Size  -  CSS  calculates  the  X  and  Y  step  sizes  used  by 
the  target  loader  to  index  into  the  target  lookup  RAM  (TLR) .  These  values 
are  independent  of  the  aspect  angle. 

Entry  (RANGE,  RANGE  +  1)  =  Range  of  target  (2  Bytes) 

(FOVS)  =  Field  of  View  Scaling  Factor 
Exit  (XM,  XM  +  1)  =  TLR  Step  Size  X  with  respect  to  X 

(XN,  XN  +  1)  =  TLR  Step  Size  X  with  respect  to  Y 

(YM,  YM  +  1)  =  TLR  Step  Size  Y  with  respect  to  X 

(YN,  YN  +  1)  =  TLR  Step  Size  Y  with  respect  to  Y 

Uses  TO 
Calls  TSC 

CZC  -  Calculate  Target  Map  Zero  Coordinate  -  CZC  calculates  the  value  of 
the  target  map  zero  coordinate  within  the  TLR  coordinate  system.  The 
equations  used  for  the  coordinate  transdformat ion  are: 

1.  X’  =  - (XC*XM  +  YC*XN  -  XK) 

2.  Y'  =  - (XC*YM  +  YC*YN  -  YK) 

Where  XC  =  X  coordinate  of  target  (scaled  azimuth) 

YC  -  Y  coordinate  of  target  (scaled  elevation) 

Entry  (XM)  =  DELTA  XM 
(XN)  =  DELTA  XN 

(YM)  =  DELTA  YM 

(YN)  =  DELTA  YN 
(XK)  =  Key  Point  X 
(YK)  <*  Key  Point  Y 

Exit  (XO)  =  Target  Map  Zero  X  Coordinate 

(YO)  -  Target  Map  Zero  Y  Coordinate 
Uses  A,  B,  X,  T0-T7 
Calls  TSC 

TSC  -  Sine/Cosine  Calculation  Routine  -  TSC  calculates  sin/cos  values  for 
an  angle.  The  angle  is  assumed  to  be  an  8-bit  positive  number  0-255,  which 
corresponds  to  an  angle  of  0-360  degrees. 
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Entry  (A)  =  Angle 
Exit  (SN,  SN  +  1)  =  Sin (A)  ABP14 
(CS,  CS  +  1)  =  Cos (A)  ABP14 
Uses  A,  B,  X,  T3,  T4,  T5 

TVT  -  Test  Valid  Target  -  TVT  checks  and  insures  that  the  target  is  in 
fact  valid.  If  not,  TVT  sets  the  target  out  of  the  field  of  view  and 
sets  all  step  si2es  to  0.  This  effectively  removes  the  target  from  considera¬ 
tion. 

Entry  (VT)  =  Valid  Target  Flag 
0  *  Not  Valid 
1  **  If  Valid 

LTL  -  Load  Target  Loader  -  LTL  transfers  to  the  target  loader  the  following 
values : 

1.  The  target  map  zero  coordinate  WRT  to  the  TLR. 

2.  All  four  incremental  values 

3.  Set  aspect  select  values  (13th  latch) 

4.  Set  complete  bit  (13th  latch) 

Uses  A,  B,  X 

ERR  -  Check  Internal  Errors  -  ERR  performs  a  short  self  check  to  determine 
if  any  detectable  errors  have  occurred.  It  check  the  following: 

1.  The  Multiplier 

2.  RAMs  T0-T7 

If  an  error  is  detected,  the  CPU  is  hung 
Exit  (CYCL)  -  (CYCL)  +  1 

(ERRF)  •  (ERRF)  +  Applicable  error  flags. 

Refer  to  Fig.  8  for  a  functional  diagram. 
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Figure  8  :  Target  CPU  Code 
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CHAPTER  FOUR 

CONCLUSIONS  AND  RECOMMENDATIONS 


4.0  Conclusions  and  Recommendations 

The  ETSG  Target  CPU  firmware  is  complete  and  totally  functional. 

The  authors  do  not  anticipate  the  need  for  firmware  changes  unless  further 
development  necessitates  alterations  in  the  coordinate  transformation  on 
target  mapping  algorithms.  All  changes  made  in  Target  CPU  firmware  as 
well  as  changes  in  Initialization  software  subsequent  to  May  5,  1981  are 
documented  in  the  ETSG  program  listings  and  in  the  author's  daily  log. 

The  Initialization  software  has  been  revised  from  Motorola  FORTRAN 
revision  number  2.20  to  FORTRAN  3.10.  Some  "debugging"  is  required  for 
this  most  recent  revision  of  the  ETSG  software. 

It  is  our  recommendation  that  the  development  of  this  software  be 
continued  and  that  the  diagnostic  software  presentl”  in  development  be 
completed. 
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Appendix  I 

Target  Coordinate  Variables 


AI.l 


Variable  Name 

Description 

Origin 

Location 

XO 

Target  Map  Origin  (TLR) 

CZC 

D051 

D052 

YO 

Target  Map  Origin  (TLR) 

CZC 

D053 

D054 

XK 

X  keypoint  (TLR) 

CAV 

D055 

D056 

YK 

Y  keypoint  (TLR) 

CAV 

D0S7 

D058 

XC 

Current  X  Coordinate 

CXY 

D059 

DO  5  A 

YC 

Current  Y  Coordinate 

CXY 

D05B 

D05C 

XM 

TLR  Step  Size  X  wrt.  X 

CSS 

D05D 

DOSE 

XN 

TLR  Step  Size  X  wrt.  Y 

CSS 

D05F 

D060 

YM 

TLR  Step  Size  Y  wrt.  X 

CSS 

D061 

D062 

YN 

TLR  Step  Size  Y  wrt.  Y 

CSS 

D063 

D064 

AI.2 


Notes  On  Target  Coordinate  Calculations 


These  notes  and  equations  may  be  used  to  verify  that  correct  numbers 
are  being  calculated  and  stored  in  the  target  CPU  RAM  for  target  coordinate 
calculations.  Substitution  of  the  appropriate  IP  input  variables  and 
direct  cell  interface  variables  into  the  equations  will  generate  correct 
values  for  each  coordinate  variable.  Scale  factors  for  the  hardware 
multiply  are  absorbed  into  the  equations.  Care  should  be  taken  in  applying 
these  equations  in  order  that  number  base  conventions  are  observed.  All 
numbers  in  the  equations  are  decimal  or  base  ten  numbers.  All  results 
must  be  converted  to  hexadecimal. 


CXY 


The  subroutine  LSHL  operates  on  FNUMB  and  ISHFT  and  yields  the  results 
IRSLT  and  ILEFT . 


FNUMB  =  IRND(NPWN*FOV/(BLRM*180*10-3/  T))/FOVD/32 
All  unknowns  are  IP  input  variables. 

ISHFT  =  15 


IRSLT  =  ACSF 

D094 

D095 

ILEFT  =  SRAC  -  7 

CNTX  =  8448*27_SRAC 

D098 

D099 

CNTY  =  8192*2 7_SRAC 

D09A 

D09B 

XC  =  (ACSF* AZIM) /215 

+  CNTX 

D059 

D05A 

YC  =  (ACSF*ELEV)/215 

+  CNTY 

D05B 

D05C 

AZIM  and  ELEV  are  direct  cell  interface  variables. 


AI.4 


CAV 

XK  =  0  For  a  point  target  PT  *  0  D055 

D056 

YK  »  0  D057 

D058 

The  values  for  XK  are  calculated  by  ASPGEN  and  stored  in  a  table 
location  $0200  +  I ASPC  j  /4. 

PPM  =  63/TSZX  Points/meter  for  simple  target. 

PPM  *  63/  V(TSZY/2)^  +  TSZX^  Points/meter  for  a  complex  target. 
TSZX  and  TSZY  are  IP  input  variables. 

XK  *  PPM*RKXM*16*SIN (ACOS ( (  JaSPcJ/4  -  1)/16)) 

YK  *  KEYY  =  KYP  =  PPM*RKYM*16 

RKXM  and  RKYM  are  initialization  input  variables  via  ETARG. 

ASPC  is  a  direct  cell  interface  variable. 


AI.5 


css 

To  compute  COS (ORNT); 

1.  Convert  ORNT  to  decimal 

2.  ORNT1q  *  1.41 

3.  COS  (1.41*ORNTl0) 

SS  -  F0VS*RANG*2SRFV 

SS  =  RANG*25*64/NPWN/ (TSZX/BLRM*1000) 

ORNT  and  RANG  are  direct  cell  interface  variables.  All  other  unknowns  are 
IP  input  variables. 


XM  =  SS*COS(ORNT)*2“15 

D05D 

DOSE 

YM  =  -SS*S1N(0RNT)*2~15 

D061 

D062 

XN  =  SS*S1N(0RNT)*2“15 

D05F 

YN  =  SS*COS(ORNT)*2'15 

D060 

D063 

D064 

A1.6 


-( (XC*XM  +  YC*XN)*2SRAC-15 

-  XK) 

D051 

- ( (XC*YM  +  YC*YN)*2SRAC-15 

D052 

-  YK) 

D053 

D054 

Initialization  Interface  Variables 


DBUG 

Debug  target  flag 

(1,FF“ DEBUG) 

D080 

VALD 

Valid  target  flag 

(1  -  Valid) 

D081 

FLAR 

Target  flare  flag 

(1  =  Flare) 

D082 

PLUM 

Complex  target  flag 

(1  =  Complex) 

D083 

CYCL 

Cycle  count 

D09E 

ERRF 

Error  flag 

D09F 

RRAN  Resolution  Range  D084 

D085 

RCO  =  TSZX/ BLRM* 1000 
RRAN  »  RCO*NPWN/(NPWN  +  1) 


LRAN  Linear  Resolution  Range 

(not  used) 


DO  8  6 
D087 


KEYY  Y  Key  Point 

IMAX  -  64 


Simple  target  Complex  target 

T1  =  TSZX  T1  -  TSZY*TSZY/4  +  TSZX*TSZX 

PPM  =  (IMAX-D/Tl  PPM  -  (IMAX  -  1)/SQRT(T1) 

KEYY  -  PPM*RKYM*16 


D088 

D089 


ISFR  Intensity  Scale  Factor  Pias  for  D08A 

Resolved  Target  D08B 

CO  -  64 

CM2PM2  -  1.0E  -  4 
SMSY  -  RNEFD*SNRT 


All.  2 


RCO  =  TSZX/ BLRM* 1000 
REAVG  =  PAVG/PMN(4)*9 

RJJP  *  IPOLTY*(RJT-BKRD*100000*EXP (ATTN/ 1000)) 

C5  =  C0*CM2PM2 / SMNSY / NPWN /NPWN 
ISFR  =  IRND( ( (ALOG(C5*RJJP/RCO/RCO/RFAVG) /ALOG/2) ) *2**8 


ISFP  Intensity  Scale 

Factor  Bias  for  a  Point  Target 

CST  *  9.0 
CO  =  64 

CM2PM2  -  1.0  E-4 
SMNSY  =  RNEFD*SNRT 
C5  -  C0*CM2PM2 / SMNSY /NPWN/NPWN 
RJJP  -  (RJT  -  BKRD* 100 00*EXP (ATTN/1000)* IPOLTY 
ISFP  -  IRND((AL0G(C5*RJJP/CST)/AL0G(2))*2**8 


AL2E  ALPHA*LOG2 (E) 

l/ln(2)  -  log2(e)  -  1.442695041 
222  -  4194304 

AL2E  =  1.44269504l*ATTN/1000*4 194304 


FOVS  Field  of  View  Scaling  Factor 

SRFV  20  Shift  Applied  to  FOVS 

RCO  «  TSZX/BLRM*1000 
FRMP  -  64.0/NPWN/RC0 
LSHL/FTMP.20) 

FTMP  -  FOVS*2SRFV“20 


ACSF 


SRAC 

CNTX 


CNTY 

PTSS 


Angle  to  Coordinate  Scale  Factor 

DPM  =  0.0572957795 

BLRD  =  BLRM*DPM 

NFOV  -  IRND(NPWN*FOVD/BLRD) 

FPPD  -  NFOV/FOVD 
TCDPC  -  A/128 
TCPPC  -  FPPD*TCDPC 
LSHL(TCPPC, 15) 

TCPPC  -  ACSF*220_J™P 

22  Shift  Applied  to  ACSF 

SRAC  =  JTMP  +  7 

Shifted  X  Center  Coordinate 

CNTX  =  528*16/ 2**JTMP 

Shifted  Y  Center  Coordinate 

Point  Target  Step  Size 

PTSS  -  64/NPWN*2**A 


D09A 

D095 


D096 

D097 

D098 

D099 


D09A 

D09B 

D09C 

D09D 


All. 4 


Appendix  Ill 
System  Flags 


AII1.1 


SYSTEM  FLAGS 

ITSW  -  =  iFLGSU)  TARGET  TYPE 

ISVSM  =  xFLGSC2>  TARGET  GEOMETRY  FOR  COMPLEX  TARGET  SIDE  VIEW 

ISC  =  iFLGS<3>  TARGET  TYPE  1=  LONG  WAVE .« K- CHL  2=  SHORT  HAVEiJ-ChL 

IPOLTY  =  IFLGSC4)  POLARITY 

IPJ  =  IFLGS<5>  PLUSE  JAMMER  FLAG 

IFL  =  IFLGSC6)  FLARE  FLAG 

I  PR I  =  j FLGS<7)  PRIORITY 

IPLM  =  iFLGS<8)  PLUME  FLAG 

ITN  =  1FLGS<9>  VIEW  NUMBER  FOR  COMPLEX  TARGET 

ITCLR  =  IFLGSC10)  TARGET  COLOR 

ISRUT  =  IFLGS<11)  TRUE  TARGET  FLAG 

IGLISW<1)  =  I FLGS < 12) 

I GL I SW ( 2 >  =  I FLGS ( 13 >  TARGET  INTENSITY  GRADIENT  FLAG 
ICLISWC3)  =  IFLGSU  4) 

ISKRSV  =  IFLGS< 15)  SEEKER  CHECK  VALUE  FROM  STTP 
IRCSW  =  IFLGSU  6)  l=ROSETTE  2=C0NSCAH 

NPWN  =  IFLGSs 17)  NUMBER  OF  POINTS  IN  ONE  DIMENSION  OF  BLUR  DIAMETE 

MX  SCR  =  IFLGSU8)  MAXIMUM  SCAN  RATE  FOR  CONSCAN 

NF  SC  < 1 )  -  IFLGS< 19)  SCALE  TO  NEFD  CHANNEL  1 

NF SC ( 2 >  -  :FLGS(20>  SCALE  TO  NEFD  CHANNEL  2 

ISROT  =  I FLGS < 2 1 >  CONSCAN  SEEKER  ROTATION 

I  SKF'CK  -  =  1  FLGS < 22)  SEEKER  CHECKSUM  VALUE 


SYSTEM  FLAGS 


I SYF 

1>  = 

SYSTEM 

ERROR- 

FLAG 

I  SYF  < 

2  >  = 

MANUAL 

SELECT 

FLAG 

I  SYF  < 

3>  = 

AUTO  SEQUENCE 

NUMBER 

I  SYF  < 

4 )  = 

STROBE 

EX 

ISTS 

I  SYF  < 

5)  = 

FLARES 

EX 

1ST 

I  SYF  ( 

6)  = 

NUMBER 

OF 

FLARES 

I  SYF  < 

7)  = 

TARGET 

1 

IS 

A  FLARE 

I  SYF f 

3)  = 

TARGET 

o 

*— 

IS 

A  FLARE 

I  SYF  ( 

9)  = 

TARGET 

3 

IS 

A  FLARE 

I  SYF  C 

ICO  = 

TARGET 

4 

IS 

A  FLARE 
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Appendix  IV 
Target  Parameters 
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TARGET  PARAMETERS 


TSZX  =  TkG<  1 > 
TSZY  =  TRG(2) 
TAR  =  TRG<3) 
RJT  =  TRG(4> 
RKXM  =  TRG(5) 
RKYM  =  TPG(6) 
RMAX  =  TRGC7) 
RMIH  =  TRG<8) 
PPM  =  TRGO) 
RC1  =  TRG( 10) 
RUHR  =  TRG(ll) 
RJTP  =  TKG( 12  > 


TARGET  SIZE  X  (METERS) 

TARGET  SIZE  Y  v METERS > 

TARGET  ASPECT  RATIO 

TARGET  RADIANCE  (  MATTS-'STERAD I AHS  ) 

X  KEY  POINT  (METERS) 

Y  KEY  POINT  (METERS) 

MAXIMUM  RANGE  (METERS) 

MINIMUM  RANGE  (METERS) 

POINTS  PER  METER  IN  T.L.R. 
RESOLUTION  RANGE  (METERS) 

RANGE  OF  1 s l  RESOLUTION  (METERS) 
CONTRAST  RADIANCE  UATTS-STERABINN 
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Appendix  V 
Intensity  Data 
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INTENSITY  BATA 


I  — 

IPLMTN 

CN(  1»I) 

PEAK 

CALL! 

CN<2i I) 

s 

EDGE 

CEX<T>»E<R»E> ] 

CN<3« I > 
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EDGE 

CYCT  ONLY j ] 

CN<4>  I) 

= 

BREAK  PT 

CXB<T>»BRK<E>»YB<R> 3 

CN<5* I > 

= 

BRK  VALUE 

C  EX  <  T  )  *  E  '•  R  *  E ) 3 

CNvt* I ) 

= 

BREAK  PT 

.  EYBCT  ONLY) 3 

C'N<?  *  I  > 

- 

BRK  VALUE 

C  EY<T  ONLY)] 

ACCUMULATED  INTENSITY  VALUES  > 


2SUM 

=  zsa* 

I) 

[  1=4* 

TOTAL  FOR  ALL 

VIEW 

ZCMT 

=  2S<2* 
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TOTAL  FOR  ALL 
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Appendix  VI 
Seeker  Paramecers 
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i 
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RNEFD(I> 
RRES< I > 
BKRB  <  I  > 
ATTtK  I  ) 
SNRT  <  I  > 
RNOIZcI) 
SIGMNCI) 
C5 


SEEKER  PARAMETERS 

RESP (  I  >  1  >  NOISE  EQUIVALENT  FLUX  DENSITY  (WATTS/C Mt2> 
RESP <  I » 2 >  SYSTEM  RESPOND IV I TY  < VOLTS 'WATTS/CMT  2  ;•  > 
RESP <  I » 3  >  BACKGROUND  IRXADIANCE  (MATTS.  CM T 2  > 

RESP <  I » 4  >  ATMOSPHERIC  ATTENUATION  COEFFICIENT  C.  KH> 

RESPU.5)  SIGNAL  TO  NOISE  RATIO  TO  TRACK 

RESPC It  6)  SYSTEM  NOISE  LEVEL 

F:ESP( I j ?>  MINIMUM  SIGNAL  AT  APERTURE 

RESP( I » 8)  SEEKER  IRRADIENCE  TO  FNS  SCALE  FACTOR 
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FIELD  OF  VIEW  DflTft 


FOV(l)  =  FOVD  C  R 3j RFOVD  C  C  3 

F  OV  <  2  >  -  BLRM  CR»C3  BLUR  D  If, METER  M  ILL  I  RADIANS) 

F0V<3>  TDPC  C  R «  C  3  TARGET  DEGREES  PER  COUNT 

F0V<4>  •=  —  j  EHTR  E  C  1 
FOV < 5 >  =  — - EFOVD  EC] 

F 0 V < 6 >  =  TCP PC  E  R » C  3  TARGET  COORDINATE  POINTS  PER  COUNT 
F0V<7>  = 

F0V<8)  = 
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Appendix  VIII 

Initialization  Processor  Subroutines 


Compiled  by  Donn  Hall 
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Initialization  Processor  Subroutines 


ACOS  -  Arccosine  Function 
Input  (x) 

ADFLT  -  Real  Array  Default  Function 
Input  (A,  I,  J,  M) 

ALP  -  Argument  List  Processor  -  ALP  is  an  assembly  routine  which  is  designed 
to  process  the  argument  list  of  an  abortran  subroutine. 

Input  -  (A)  =  Number  of  Arguments. 

ANMD  -  Set  Alpha-Numeric  Mode 
APKT  -  Intensity  Target  Display 
Input  -  (IA,  IR,  MX,  NLVLS) 

Call  -  (INIT,  PAGE,  GREY) 

AS IN  -  Arcsine  Function 
Input  (x) 

ASPGEN  -  Plume  Aspect  Generator 

Inputs  -  (AR,  KEYX)  Input  files  -  (IFLGS,  SA:B,  TRG.SA:0) 

Call  -  (LDASF,  LDTCPO) 

AXES  -  Flare  History  Display 
Inputs  (X,  Y,  N) 

Call  -  (INIT,  PAGE,  PLOT,  CRSR) 

BELL  -  Sound  150  MS  BELL 
BLNK  -  Set /Clear  Blink  Mode 

Input  (OP)  OP  =  1,  Bunk  mode  on  :  OP  »  0  Clear  Blink  Mode 
CKINIT  -  Check  initialization  -  CKINIT  is  a  FORTRAN  callable  assembly  routine 
which  is  designed  to  check  if  a  total  system  initialization  is  in 
order.  A  system  initialization  may  be  necessary  for  any  of  the 
following  reasons: 

1.  A  power  up  restart  has  been  done  on  the  ETSG 

2.  A  power  failure  which  cause  reset  of  the  PIAS 

3.  A  hardware  abort  (restart) 

If  any  of  these  three  reasons  are  present,  CKINIT  will  initialize 
all  PIAS  and  return  a  initialize  required  FLAS. 

Input  -  ( IVAL)  -  0,  if  initialization  was  necessary 

1,  if  initialization  was  not  necessary 
Call  -  (ALP,  TP IAS) 

CLRTMP  -  Clear  Target  Map  -  CLRTMP  is  a  FORTRAN  callable  assembly  routine 

designed  to  reset  the  target  maps  to  a  clear  state.  It  will  write 
zeros  to  both  half s  of  both  channels  of  the  target  map. 
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CNVERT  -  Convert  ETSG  Floating  Point  to  MOTORODA  Floating  Point 
Input  -  (INUMB) 

COLR  -  Set  Background/Foreground  Color 
Input  -  (BACK,  FORE) 

CPS  -  Check  Plot  Status  -  This  subroutine  checks  to  see  if  the  terminal  is 
currently  in  plot  mode  or  in  a  plot  submode,  but  leaves  "PLTF"  set  CPS 
always  leaves  the  interface  plot  mode  set  (PLTF) 

CRSR  -  Set  Cursur  Position 
Input  (COLM,  LINE) 

DIR  -  Directory  of  SEEKERS  and  TARGETS  -  DIR  produces  a  listing  of  all 
TARGETS  and  SEEKERS  previously  recorded  in  memory. 

PLY  -  Delay  For  Specified  Time.  -  DLY  will  wait  for  a  specified  time.  This 
delay  is  in  increments  of  10  incroseconds  with  a  minimum  of  40  microseconds 
delay. 

Input  -  (B)  B  =*  Number  of  10  microsecond  delays 
DPLX  -  Set  Half/Full  Duplex 

Input  -  (MODE)  MODE  »  0,  Half  Duplex:  MODE  “  1,  Full  Duplex 
PRC  -  Draw  Boresight  Circles  -  DRC  Draws  two  circles  on  the  monitor /display. 
The  routine  is  entirely  table  driven.  All  values  for  the  X/Y  coordinate 
values  for  the  circle  points  have  been  precalculated 
Call  -  (TCRD/OUT) 

DRX  -  Draw  Boresight  Crosshairs  -  DRX  places  A  "+"  in  the  center  of  the 
monitor  display. 

ETARG  -  ETSG  Target  Generator  Program  -  ETARG,  in  cooperation  with  the 
user,  sets  all  the  static  parameters  for  a  given  target. 

Input  Files  -  (IFLGS.  SA:0,  CN.SA-.O,  TRG.SA:0,  F0V,SA:0,  RESP.SA:0, 

ZS.SA:0,  ETSG.CM:0,  ESYS.SA:0,  DSKR.SA:0  SCR0IJ7Z.QR:0) 
Call  -  (FILTST,  MLOAD,  STTP,  BELL,  INVERT,  LDPTIG,  PAGE,  GENTRG ,  DELF, 
ASPGEN,  STTGCH,  STTSGN,  STSTBB,  LDTCPV,  LSHL,  LDDSPC) 

ETSG  -  Driver  For  ETSG  Initialization  -  ETSG  initializes,  in  cooperation 
with  the  operator  (user) ,  all  seeker  and  target  static  parameters  by 
call  ins  other  subroutines. 

Input  Files  -  (ESYS:SA:0,  DSKR.SA:0,  Various  user  defined  variables, 

Seek.CMsO,  ETARG. CM:0,  PULSE. CM:0,  FLARE. CM:0,  RUNETSG . 
CM:0) 

Call  -  (INIT,  PAGE,  BELL,  CKINCT,  FILTST,  INITCP,  MLOAD,  DELF,  SEEK, 
ETARG,  PULSE,  FLARE,  RUNETSG. 
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ETSGGO  -  Set  Ready /Run  Modes 
Call  -  (READY,  RUN) 

FLAG  -  Set/Clear  Flag  (Enable/Disable  Erase) 

Input  -  (IFLAG)  1FLAG  -  0  Clear;  I FLAG  =  1  Set 
FLARE  -  FLARE  Generation  Program  -  FLARE  sets  all  parameters  for  flare  type 
targets. 

Input  Files  -  (ESYS.SA:0,  ETSG.CM-.O) 

Call  -  (KEYIN,  INIT,  PAGE,  BELL,  FILTST,  MLOAD,  AXES,  LDTCPU) 

GENTRG  -  General  Target  Generator  -  GENTRG  is  called  by  "ETARG"  to  produce 
the  targe-  image  based  upon  the  parameters  set  in  "ETARG". 

Input  Files  (IFLGS.SA-.O,  CN.SA:0,  TRG.SA-.O,  ZS.SA:0 
Input  -  (ITYPE,  SIZEX,  SIZEY,  IFLZ) 

Call  -  (MX,  IRND,  INVERT,  OUTFLT,  SAVTRG) 

GRAPH  - 

Input  -  (JSIG.N) 

Call  -  (PAGE,  PLOT,  CRSR) 

GREY  -  Provide  GREY  Scale  Character. 

Input  (IX,  IY,  IV) 

IX  =  Character  Column  (See  CRSR) 

IY  *  Character  Line  (See  CRSR) 

IV  =  GREY  Scale  Valve  (1  to  55) 

GRSC  -  GREY  Scale  Value  (Table) 

IADET  -  Integer  Array  Default  Function 
Input  -  (I ,A,I , J ,M) 

INIT  -  Initialize  Plotting  Package 
INITCP  -  Initialize  CPU 

Call  -  (LDDSPC,  LDTCPU) 

INVERT  -  Convert  Motorola  Floating  Point  Numbers  to  ETSG  Floating  Point 
Numbers  and  return  the  result  as  an  Integer. 

Input  -  (RNUMB) 

Call  -  (SAA) 

IRND  -  Real  to  Integer  Rounding  Function 
Input  -  (X) 

LDASP  -  Load  Target  Aspect  Ram  -  LDASP  Is  a  FORTRAN  callable  routine  designed 
to  transfer  data  from  the  initialization  processor  to  a  select  target  CPU 
aspect  Ram 

Input  -  (ITRGT,  IVIEW,  IARRY) 

Call  -  (ALP,  SEA,  MDV,  CEA) 
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LDDSPC  -  Load  Display  Processor  -  LDDSPC  is  a  FORTRAN  callable  routine 
designed  to  transfer  data  from  the  initialization  processor  to  the  display 
processor  of  the  ETSG  system.  It  also  presets  other  values  for  the 
display  CPU. 

Input  -  (ITARG,  ICOLR,  MINAR,  MAXAR) 

Input  -  (0,  ISCLF ,  0,  0) 

Call  -  (ALP,  SEA,  MDV,  CEA) 

LDNTRR  _  Load  Null  Track  Radios  Ram  -  LDNTRR  is  a  FORTRAN  callable  routine 
designed  to  transfer  data  from  the  initialization  processor  to  the  null 
track  (reticle  rotation)  rams  of  the  ETSG  system. 

Input  -  (ICHNL,  ICONT,  IDATA) 

Call  -  (ALP,  SEA,  MDV,  CEA) 

LDPLSJ  -  Load  Pulse  Jammer  -  LDPLSJ  is  a  FORTRAN  vallable  routine  designed 
to  enable  the  initialization  processor  to  load  the  bit  pattern  used  to 
describe  the  pulse  jammer  for  the  ETSG  system. 

Input  -  (IARRAY,  NWORDS) 

Call  -  (ALP,  SEA,  CEA) 

LDPTTG  -  Load  Target  Lookup  Ram  with  a  Point  Target  -  LDPTTG  is  a  FORTRAN 
callable  routine  designed  for  transfer  data  from  the  initialization  processor 
to  a  selected  target  CPUs  lookup  ram  point  target 
Input  -  (ITARG,  IDATA) 

Call  -  (ALP,  SEA,  MDV,  CEA) 

LDRET  -  Load  Reticle  Maps  -  LDRET  is  a  FORTRAN  callable  routine  designed 
to  transfer  data  from  the  initialization  processor  to  the  reticle  maps  of 
the  ETSG  system. 

Input  -  (ICHNL,  IDATA) 

Call  -  (ALP,  SEA,  MDV,  CEA) 

LSHL  -  Left  Shift  with  Limit  -  LSHL  will  shift  a  given  floating  point  number 
left  up  to  a  supplied  number  of  bits  while  retaining  integer  value  limits 
on  the  result. 

Input  -  (FNUM,  ISHFT)  -  Output  -  (IRSLT,  I LEFT) 

Call  -  (ALP) 

LDTCPU  -  Load  Target  CPU  -  LDTCPU  is  a  FORTRAN  callable  routine  designed 
to  transfer  data  from  the  initialization  processor  to  a  selected  target 
processor  of  the  ETSG  system. 

Input  -  (ITARG,  IARRY,  NWORD,  I0FFS,  ISIZE) 

Call  -  (ALP,  SEA,  MDV,  CEA) 


AVUI.5 


r  f 

i 

| 

| 


LDTLR  -  (Load  Target  Lookup  Ram)  -  LDTLR  is  a  FORTRAN  callable  routine 
designed  to  transfer  data  from  the  initialization  processor  to  a  selected 
target  CPUS  lookup  ram 

Input  -  (ITRGT,  IARRY,  IVIEW,  IROWN) 

Call  -  (ALP,  SEA,  MDV,  CEA) 

NRT  -  Null  Track  Radius  -  Generates  coordinates  for  null  track  radius  hard¬ 
ware 

Input  -  (NFOVR,  ENTR,  ISROT) 

Call  -  (LDNTRR) 

OUT  -  Output  Character  to  Monitor  -  Out  ships  one  character  to  the  monitor 
with  a  delay  of  53  MS.  If  this  is  insufficient  time  for  the  control  character 
in  question,  a  further  delay  must  be  implemented. 

Input  -  (A)  A  =  Character  to  send 
Calls  -  (DLY) 

OUTC  -  Ship  Character  to  Intecolor  (Terminal) 

Input  -  (A)  A  =  Character  to  ship) 

OUTP  -  Output  Character  with  Programmable  Delay 
OUTPUT  -  Output  Subroutine  for  Display 
Input  -  ( IPTG ,  JJ,  IPKP ,  NLVLS) 

Call  -  (LDTLR,  APKT,  PKT) 

OUTS  -  Output  Character  with  Standard  Delay 
Input  (A) 

PAGE  -  Clear  Screen 

PCT  -  Reticle  Point  Counter  -  Counts  the  number  of  points  in  the  reticle 
to  insure  that  it  does  not  exceed  the  field  of  view 
Input  -  (IA,IR)  IA  =  Total  field  of  view 

IR  =  Radius  of  reticle  (if  the  scan  is  a  square  scan 
IR  *  Half  the  width  of  scan) 

TART , ETARG  sub  module) 

PICT  -  Target  Display 

Input  -  (IA,  IR,  MX,  NLVLS) 

Call  -  (INIT,  PAGE,  COLR,  PLOT,  DRSR,  TEXT,  GREY,  ANMD) 

PLOT  -  ETSG  Plotting  Package  (Driver  Routine) 

Input  -  (ARG1,  ARG2,  ARG3) 

Call  -  (ANMD,  BELL,  BLNK,  COLR,  CRSR,  DPLX,  FLAG,  GREY,  INIT,  PAGE,  PLOT, 
ROLL,  TEXT,  ALP,  BSCT) 

PLOT  -  Move  *  Pen  *  To  (X,  Y)  coordinates 
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Input  -  (X,Y,P) 

X  »  X  coordinate  value  (0  to  159) 

Y  =  Y  coordinate  value  (0  to  191) 

P  =  Z  Move  *  Pen  *  Down  P  *  3  Move  *  Pen  *  Up. 

PMD  -  Parameter  Mapping  and  Overflow  check  -  PMD  initializes  CRT,  loads  post 
processing  data,  prints  headings,  displays  data,  checks  rosette  limits, 
checks  intensity  overflow  flags 
Input  -  (  ) 

Call  -  (INIT,  PAGE,  RDDSPC,  RDTCPU,  LDTCPU,  BI) 

PMS  -  Plot  Mode  Start  -  PMS  is  called  to  initiate  interface  plot  mode 
Call  -  (OUTC) 

PMT  -  Plot  Mode  Terminate  -  PMT  is  called  to  terminate  the  interface  plot 
mode 

Call  -  (OUTC) 

PRS  -  Process  Preset  -  PRS  initializes  the  ACIA  for  terminal  I/O  and  programs 
the  PIA 

Call  -  (OUT) 

PULSEJ  -  Pulse  Jammer  (Strobe)  History  Generator  -  PULSEJ  generates  all 
necessary  parameters  for  pulse  jammer  (Strobe)  targets 
Input  Piles  -  (ESYS.SA.-O,  ETSG.CM.'O) 

Call  -  (KEYIN,  INIT,  BELL,  PAGE,  PILTST,  MLOAD,  GRAPH,  LDPLSJ,  CRSR) 
RDDSPC  -  Read  Display  CPU  -  RDDSPC  is  a  FORTRAN  callable  routine  designed 
to  transfer  data  from  the  display  processor  to  the  initialization  processor 
after  an  ETSG  run 

Input  -  (I FLAG,  IMNAR,  I MI NR,  IMAXR,  IMXAR) 

Call  -  (ALP,  SEA,  MDV,  CEA) 

RDTCPU  -  Read  Target  CPU  -  RDTCPU  is  a  FORTRAN  callable  routine  designed 
to  transfer  data  from  a  selected  target  CPU  to  the  Initialization  processor 
after  an  ETSG  run. 

Input  -  (ITRGT,  IARRY ,  NWORD,  IDFFS ,  ISIZE) 

Call  -  (ALP,  SEA,  MDV,  CEA) 

RDTMP  -  Read  Target  Map  -  RDTMP  is  a  FORTRAN  callable  routine  designed  to 
read  the  target  maps  one  line  at  a  time. 

Input  -  (ICHNL,  ITMAP,  ILINE,  IARRY) 

Call  -  (ALP) 
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READY  -  Enable  ETSG  to  Run  -  READY  is  a  routine  which  will  set  the  ETSG 
in  run  mode  and  set  the  READY  line  (To  the  CDC  6600)  high. 

RETGEN  -  Multi-Size  Reticle  Generator  -  RETGEN  creates  a  reticle  of  the 
size  asked  for  by  the  user. 

Input  -  (NPTS)  NPTS  =  Number  of  points  for  width 

Call  -  (PCT,  CRSR,  PAGE,  FILTST) 

ROLL  -  Set  Terminal  in  Roll  Mode 

RPS  -  Restore  Plot  Status  -  RPS  sets  the  terminal  in  the  plot  submode 
specified  by  "PLTF"  Used  in  conjunction  with  "CPS"  it  allows  a  non-plot 
function  to  be  issued  from  within  a  plot  mode.  If  plot  sub-mode  is 
specified,  the  interface  plot  is  left  set. 

Input  -  (PLTF)  PLTF  *  Plot  submode  desired 
RUN  -  Final  terminal  preparation  -  RUN  is  the  last  routine  called  by  the 
ETSG  initialization  software.  It  prepares  the  terminal  for  the  run  and 
turns  control  over  to  the  display  processor.  Control  is  returned  to  the 
calling  routine  when  the  terminal  is  once  again  handed  over  to  the 
initialization  software.  Final  terminal  preparation  consist  of  the 
following: 

1.  Clear  the  screen 

2.  Draw  two  concentric  circles  (FOV  Representations) 

3.  Draw  crosshairs  between  the  circle 

Call  -  (DRC,  DRX) 

RUNET SG  -  Initialize  system  to  run  -  After  completion  of  target  and  seeker 
loading  "RUNETSG"  Initializes  the  system  to  run.  When  initialization  is 
complete  a  command  is  sent  to  the  monitor  allowing  the  user  to  start  the 
run 

Input  Files  -  (ESYS.SA:0,  ETSG. CM: 0) 

Call  -  (KEYIN,  INIT,  PAGE,  BELL,  FILTST,  BOOT,  OPENF,  DELF,  LDTCPU, 
CLRTMP,  STSEER,  READY,  READA,  RUN,  CRSR,  PMD,  CLOSEF) 

SAA  -  Set  Argument  Addresses  -  SAA  is  a  routine  that  sets  aside  an  address 
for  the  result  of  an  arithmetic  process  and  enables  that  result  to  be  read 
back  into  the  calling  routine 

Input  -  (RSLT) 
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SEEK  -  Set  Seeker  Parameters  -  SEEK,  in  cooperation  with  the  user,  sets  all 
static  parameters  for  the  seeker 

Input  File  -  (IFLGS.SA:0,  RESP.SA:0,  FOV.SArO,  DSKR.SA:0,  DROS.SA:0, 
ICON.SA:0,  ESYS.SA:0,  ETSG.CM:0) 

Call  -  (KEYIN,  INIT,  PAGE,  BELL,  FILTST,  DIR.LDDSPC,  STAROS,  NTR,  RETGEN , 
STOAC ,  MLOAD) 

SAVTRG  -  Save  Target  Parameters  and/or  Image 

SRM  -  Set  Run  Mode  -  SRM  is  called  to  terminate  the  initialization  process. 

It  turns  the  display  over  to  the  display  processor,  and  starts  the  run. 

Call  -  (OUT,  DLY,  INIT) 

STAROS  -  Set  Rosette  Scan  X/Y  Amplitudes  -  STAROS  is  a  FORTRAN  callable 
routine  which  will  allow  the  initialization  processor  to  set  the  amplitude 
(MIN/MAX,  X  and  Y  values)  for  the  rosette  scan 
Input  -  (IXMIN,  IXMAX,  IYMIN,  IYMAX) 

Call  -  (ALP) 

STOAC  -  Set  Analog  Output  Controls  -  STOAC  programs  the  PIAs,  DACs  etc., 
which  controls  the  analog  output  of  the  ETSG.  The  values  set  by  STOAC 
include: 

1.  The  background  level 

2.  The  noise  source  level 

3.  The  analog  scale  factor  adjust 

Input  -  (ICHNL,  IPBGL ,  IPNSL,  IASFA,  7TSFA,  IESFC) 

Call  -  (ALP) 

STSEEK  -  Set  Seeker  Type  -  STSEEK  is  the  ETSG  interface  with  the  PIA  that 
controls  the  simulated  seeker  type  the  ETSG  is  currently  rising 
Input  -  (ITYPE) 

Call  -  (ALP) 

STSTRB  -  Set  Strobe  Flag  for  Target 
Input  -  (ITRGT,  ISTRB) 

STTGCH  -  Set  Target  Channel 
Input  -  (ITRGT,  ICHNL) 

STTGPM  -  Set  Strobe  Flag,  Target  Channel  and  TARG  Polarity,  (DRIVER,  ROUTINE) 
Call  -  (STTGCH,  STTSGN ,  STSTRB) 

STTP  -  Set  Target  Type  and  Priority  -  STTP  sets  the  target  type,  priority, 
and  generation  flags. 

Input  Files  -  (IFLGS.SA:0,  DTRI.SA:0,  DELL . SA : 0 ,  DRECT.SA:0,  DPLUM.SAtO) 
Call  -  (FILTST,  DIR) 
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STTSGN  -  Set  Target  Sign 
Input  -  (ITRGT,  ISIGN) 

TEXT  -  Send  Text  to  Terminal  -  This  subroutine  ships  characters  to  the 
terminal  bypassing  the  FORTRAN  I/O  package — This  allows  cursur  addressing 
of  text  on  the  screen  (Via  CRSR) 

Input  -  (INFO,  NUMB) 

TP IAS  -  Table  of  PIAS  to  Initialize 

TRCD  -  Table  of  Coordinates  for  Boreslght  Circles 
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Appendix  X 

ETSG  Operating  Instructions 


Operating  Instructions 


1.  Turn  display  console  "ON." 

2.  Open  doors  to  disk  drive  and  remove  any  diskettes  therein. 

3.  Turn  disk  drive  "ON." 

4.  Insert  diskette  DPO  in  drive  0. 

5.  Insert  diskette  with  appropriate  seeker  and  target  files  in  drive  1. 

6.  Close  disk  drive  doors. 

7.  Depress  EXORciser  RESET  button. 

8.  Type  E800;G 

9.  Type  ETSG  at  the  console  after  the  MDOS  prompt  -  appears. 

10.  The  ETSG  initialization  software  is  interactive  and  will  now  prompt 
the  operator. 

This  instruction  set  assumes  that  the  EXORciser  is  "on."  If  this 
is  not  true  refer  to  the  "power  up"  Instructions  in  Appendix  XI.  For  more 
explicit  instructions  refer  to  the  "ETSG  Operator  Manual"  which  is  generally 
kept  near  the  ETSG. 
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Appendix  XI 

Frequently  Used  MDOS  Commands 

Compiled  by 
D.  E.  Bockstahler 
and 

G.  R.  Loefer 
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POWER  UP: 


I.  Turn  on  CRT  (switch  on  back,  right  raar) 

II.  Turn  on  EXORCISOR  ( key  switch) 

III.  Turn  on  Disk  Unit  (red  button  on  frtjnt) 

BRINGING  UP  MOOS: 

I.  Slide  System  Disk  into  Drive  0  (left  side)* 

II.  Slide  User  Oisk  Into  Drive  1  (right  ;1de)* 

III.  Close  both  doors  on  Oisk  Unit 

IV.  Type:  'MAID'**  (no  carriage  return) 

V.  Type:  'E800;G'**  (no  carriage  return) 

'■'  Equals  Sign  should  come  up  when  the  system  is  ready. 

If  not,  start  over  at  Step  IV. 

*To  load  a  disk:  Hold  disk  carefully,  (do  not  bend)  with  the  label  side 
up  and  the  opening  on  one  edge  toward  the  disk  drive.  Slide  the  disk 
slowly  and  smoothly  into  the  unit  until  It  stops  just  past  the  door. 

**N0TE:  Coimand  strings  are  enclosed  in  single  1  '  quotes. 

Lower  case  letters  inside  quotes  are  user  selectable  names. 
Upper  case  letters  inside  quotes  MUST  be  entered  as  shown. 

POWER  DOWN: 


I. 

OPEN  BOTH  DISK  DRIVE 

DOORS  FIRST 

II. 

Remove  User  Disk  and 

return  to  box 

III. 

Remove  System  Oisk  and  return  to  box 

IV. 

Turn  OFF  Disk  Unit 

V. 

Turn  OFF  EXORCISOR 

VI. 

Turn  OFF  CRT 
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BAUD  RATE: 


I.  Set  de«<red  BAUD  Rate  Switch  on  CRT  and  turn  OFF  the 
previously  set  rate. 

II.  Set  matching  BAUD  Rate  on  the  EXQRCISOR.  (switch  is 
on  the  right  rear)  * 


AXI.3 


FORTRAN  QUICKIE: 

I.  Turn  on  CRT 

II.  Turn  on  EXORCISOR 

III.  Turn  on  Disk  Unit 

IV.  Type:  'MAID' 

V.  Type:  ’E800;G' 

VI.  Create  Program  File  with  Editor  (store  on  Disk  Unit  1) 

VII.  Type:  'CHAIN-*F4;FNXfi1enameX' 

VIII.  To  Execute  Type:  'filename:l' 

FREQUENTLY  USED  HOPS  COMMANDS: 

Note:  -<-*•  means  a  space  must  be  put  here. 

FORMAT: 

PURPOSE :  To  prepare  a  new  disk  or  wipe  out  an  old  one 

I.  Load  Disk  into  Drive  1 

II.  Type:  'FORMAT'.  RESPONSE:  'FORMAT  DRIVE  1 ' 

III.  Type:  'Y'  for  YES.  RESPONSE:  'LOCK  OUT  ADDITIONAL  SECTORS  ' 

IV.  Type:  'IT 

DQSGEN: 

PURPOSE :  To  initialize  a  new  disk 

I.  Load  formatted  disk  into  Drive  1  (if  not  already  there) 

II.  Type:  'DOSGEN TU'  for  a  user  disk  or 
Type:  ' DOSGEN «-nT'  for  a  system  disk 
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DIR: 


PURPOSE:  List  directory  of  files  on  a  disk 

I.  Type:  'DIR*  for  directory  of  Oriye  0  or 

Type:  ‘DIR  *~+: 1 '  for  directory  of  Drive  1 


LIST: 


PURPOSE :  To  list  any  ASCII  file  stored  on  a  disk 

I.  Type:  'LIST-^fllename'  for  a  file  on  Drive  0  or 
Type:  'LIST«-*-fi1ename:r  for  a  file  an  Drive  1 

filename:  flame  of  file,  including  the  suffix  if  not  '.SA‘ 


DEL: 


PURPOSE:  To  delete  a  file  from  a  disk 

I.  Type:  'DEL^+filename'  for  a  file  on  Drive  0  or 
Type:  'DEL  f11ename:l‘  for  a  file  on  Drive  l 

filename:  Name  of  file,  including  suffix 


COPY: 


PURPOSE :  To  copy  files  (same  disk  or  between  disks) 

I.  Type:  *  COPY-*— ►f  1 1  enamel,  filename2‘ 

fllenamel:  Name  of  source  file,  including  suffix  and 
drive  number 
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fi1ename2:  flame  of  new  file,  including  suffix  and 
drive  number 


NAME: 


PURPOSE :  To  change  a  disk  file  name 


I.  Type:  1  NAME«-*f  i  1  enamel,  filename2‘ 


filenamel:  flame  of  old  ■ tie,  including  suffix  and  drive  number 
filename2:  Name  of  new  file,  including  suffix  and  drive  number 


BACKUP: 

PURPOSE :  To  make  a  complete  copy  of  a  disk  and 
To  reorganize  files  thereon 

I.  Copy  files  to  system  disk  in  Drive  0 

II.  Place  a  formatted  blank  disk  in  Drive  1 

III.  Type;  ' BACKUP*-; UR' .  RESPONSE:  'BACKUP  FROM  DRIVE  0  TO  1' 

IV.  Type:  'Y'  for  Yes 

EDIT: 


PURPOSE :  To  edit  ASCII  files 

I.  Type:  'EDIT-t—filename' 

filename:  flame  of  file,  including  suff1<  and  Drive  No. 

II.  Type:  ' AAAAAAAAAAAAAA  .  .  .$$'  *  (this  loads  the  file) 
(use  repeat  key) 

III.  See  section  on  EDITOR  for  list  of  commands  and  a  hints 
and  k’nks  list 

‘Note:  $  means  ESCape  Key 
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Appendix  XII 
The  6800  Text  Editor 

Compiled  by 
D.  E.  Bockatahler 
and 

G.  R.  Loafer 
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TEXT  EDITOR: 


I.  Command  Summary:  Table  2 

II.  EDITOR  Messages:  Table  3 

III.  Hints  and  Kinks 

1.  This  is  a  CHARACTER  editor  and  NOT  A  LINE  editor  like  TED  on  the 
CYBER. 

2.  All  characters,  INCLUDING  CARRIAGE  RETURN,  are  legal  characters  to 
be  edited. 

3.  A  ’$$’  (hit  ESCape  key  twice)  marks  the  end  of  a  command  line. 

4.  Commands  may  be  concatenated  on  one  line  (if  you  can  keep  track  of 
them)  without  any  extra  delimiter  characters. 

5.  MISTYPE?  Use  SHIFT-RUB  (most  consistant)  or  CNTRL-H  (only  in 

EDITOR)  for  BACKSPACE. 

6.  Use  'B'  to  position  pointer  at  head  of  file. 

7.  Use  * Z *  to  position  pointer  at  end  of  file. 

8.  Une  n'T'  to  display  n  lines.  Does  not  move  pointer. 

9.  Use  n'L*  to  skip  n  lines.  *L '  positions  the  pointer  JUST  AFTER  THE 

LAST  CARRIAGE  RETURN.  'L'  counts  carriage  returns,  n  may  be 

negative  to  backup  lines. 

10.  To  input  a  new  program  (or  a  new  block  of  statements),  use  the  'I' 
command.  Type  one  'I*,  then  enter  the  entire  block  of  code  as  if 
using  a  typewriter  and  then  type  $$(ESC  ESC).  The  entire  block 
is  entered  all  at  once. 

11.  To  input  new  lines  between  old  ones,  use  n'L*  to  position  the 

pointer  AFTER  THE  LAST  LINE  TO  PRECEED  THE  NEW  LINES.  It  works 

like  an  'INSERT  BEFORE’  command. 

12.  Use  n'K*  to  delete  n  lines.  Position  pointer  just  after  the  last 
line  to  be  kept. 

13.  Use  'C'  to  change  a  string  within  a  line.  Position  pointer  just 
ahead  of  line  to  be  edited,  (so  that  a  *T*  will  display  the  line). 
Use  ’Ccurrentstring$newstring$-LLT'  to  change  a  string  of 
characters  and  display  the  corrected  lire. 


TABLE  2.  EDITOR  COMMAND  SUMMARY 


COMMAND  DESCRIPTION 

*  A  Append.  Appends  input  text  front  the  System  Reader  Device 

to  tnc  edit  buffer. 

*  B  Beginning.  Moves  the  edit  buffer  pointer  to  the  beginning 

of  the  edit  buffer. 

*  Cstringl$  Change.  Replaces  the  first  occurrence  of  "string  1"  with 

strings  "string  2". 

nD  Delete.  Deletes  n  characters  from  the  edit  buffer. 

E  (tape)  End.  Terminates  an  edit  operation  by  writing  the  contents 

of  the  edit  buffer  to  the  output  tape  and  copying  the 
remainder  of  the  input  tape  to  the  output  tape.  Returns 
control  to  the  editor. 

*  E  (disc)  End.  Terminates  an  edit  operation  by  writing  the  contents 

of  the  edit  buffer  to  the  output  file  and  copying  the 
remainder  of  the  input  file  to  the  output  file.  Returns 
control  to  the  disc  operating  system. 

F  (tape)  Tape  Leader/Trailer.  Writes  50  NULL  characters  into  the 

system  punch  device. 

F  (disc)  The  F  command  is  ignored. 

*  Istring  Insert.  Inserts  characters  or  lines  of  text  into  the  edit 

buffer. 

*  nK  Kill  lines.  Deletes  n  lines  from  the  edit  buffer. 

*  nL  Line.  Moves  the  edit  buffer  point  n  lines. 

nM  Move  character  pointer.  Moves  the  edit  buffer  pointer  n 

characters. 

Nstring  (tape)  Search  File.  Searches  file  for  first  occurrence  of  "string". 

I 

Nstring  (disc)  Search  File.  Searches  file  for  first  occurrence  of  "string". 

If  "string"  is  not  found,  returns  control  to  the  disc  operating 
system. 

nP  Punch.  Punches  n  lines  from  the  edit  buffer  to  the  System 

Punch.  Device. 

*  Satrlng  Search.  Searches  the  edit  buffer  for  the  first  occurrence 

of  "s'.rlne," 

*'!■  ist  off.-::;  used  command 

ESC  Key 
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TABLE  2.  EDITOR  COMMAND  S'JMMARY 
(continued) 


COMMAND 

DESCRIPTION 

*  nT 

Type.  Types  n  lines  from  the  edit  buffer  to  the 

System  Console  Device. 

:<  (tape) 

EXbug.  Returns  control  to  EXbug. 

X  (disc) 

The  X  command  is  an  illegal  command  in  the  disc  version  of 
the  editor.  . 

*  Z 

End  of  edit  buffer.  Moves  the  edit  buffer  pointer  to  the 
end  of  the  edit  buffer. 

Control  H 

Backspace.  Causes  the  last  character  entered  in  the  command 
mode  to  be  typed  on  the  System  Console  Device  and  deleted 
from  the  command. 

Control  X 

Cancel.  Causes  all  commands  following  the  last  prompt  to  be 
deleted  and  another  prompt  to  be  typed. 

TABLE  3.  EDITOR  MESSAGES 


MESSACE 

DESCRIPTION 

M6S00  RESIDENT  EDITOR  n.n 

Printed  upon  initiation  of  editor.  Revision 

is  specified  by  n.n. 

9 

Prompt.  Editor  is  waiting  for  a  command. 

???? 

Illegal  command. 

CAN'T  FIND  "string" 

Editor  cannot  find  the  string  specified 

by  Search  or  Change  command. 

BELL 

The  editor  rings  the  bell  in  the  System  Con- 

sole  Device  when  the  user  attempts  to  enter 

further  commands  into  a  full  command  buffer. 

The  user  must  delete  (backspace)  two  charac- 

ters  in  order  to  terminate  the  command  with 

two  ESC  characters. 
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14.  Use  '$string$'  to  search  for  a  character  string  within  the  file. 
It  starts  searching  from  the  current  pointer  position  to  the  end  of 
the  file.  The  pointer  will  end  up  at  the  end  of  the  string  it 
found,  (not  at  the  beginning  of  the  line).  Use  '-LL'  to  position 
at  beginning  of  line. 

15.  Use  *BE‘  to  end  the  editor  program.  Do  not  use  just  an  'E',  you 
might  lose  some  of  your  file. 

Note:  *$'  means  ESCape  key. 

FORTRAN: 


MOTE:  Be  very  careful  to  follow  the  manual  when  composing  a  FORTRAN 

program  for  the  EXORCISOR.  It  falls  short  of  ANSI  Standard 
FORTRAN  in  a  number  of  places  (see  Table  4). 

I.  Prepare  FORTRAN  programs  using  the  EDITOR. 

II.  Programs  must  be  complete  within  one  file  to  be  compiled  and 

run.  However,  subroutines,  etc.  may  be  stored  seperately  and 
merged  prior  to  compilation,  or  just  before  the  Linking  Loader 
command  as  shown  below. 

III.  For  a  one  file  program  in  file  'prog.SA:l'  DO: 

'  CHA I  N+-*F  4 ;  FN  »prog% 1 

DO  NOT  store  programs  on  Drive  0. 

When  finished,  simply  type:  'prog:!'  to  run  the  program. 

IV.  For  MULTI-FILE  programs,  progi.SA:l,  subl.SA’.l,  etc. 

After  making  sure  all  old  ‘  .R0'  files  are  deleted,  DO: 
*FORT-*-*progl.SA:l' 

'  FORTES  ubl.SA:l' 

'FORT^etc.'  (as  many  as  there  are) 

,MERGE-*-*-progl  .RO:  1  ,subl  .RO:  1,.  .  .  ,<1est  .RO:  1 ' 
dest:  destination  file  name 
•CHAIN—RLjFfttdestS* 

Then  Type:  'dest:l*  to  run  the  program 
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TABLE  4.  CONVERSION  OF  FORTRAN  FROM  CDC66QO  TO  exorcises 


1.  No  program  statement.  For  READ  and  WRITE  to  units  other  than  CRT 
use  OPENF  and  CLOSEF. 

2.  No  blank  lines  in  source  file. 

3.  must  be  used  for  continuation  in  Column  1  (see  special  compile 
features  of  FORT  2.2). 

4.  INT  and  FLOAT  functions  do  not  exist.  Simply  assign  to  opposite 
type  variable  to  switch  types. 

5.  Variables  and  arrays  are  not  initialized  to  zero. 

6.  Only  one  dimension  statement  per  program  block  (use  continuation). 

7.  No  variable  array  dimensioning  or  accessing  outside  the  dimension 
in  subprograms. 

8.  No  labeled  common. 

9.  Can't  use  same  variable  in  both  data  and  common  statements. 

10.  Some  forms  of  data  statement  illegal. 

11.  No  one  line  functions. 

12.  Parameters  of  functions,  subroutines,  and  array  indices  must  be 
constants  or  simple  variables  (no  expressions). 

13.  Change  Unit  5  (INPUT)  to  Unit  100  (from  CRT  keyboard). 

14.  Change  Unit  6  (OUTPUT)  to  Unit  101  (to  CRT  screen). 

15.  HO  FREE  FORMAT  WRITE. 

16.  FREE  FORMAT  INPUT  and  write  a  blank  line  use:  998  FORMAT (  ). 

17.  No  'H'  (HOLLERITH)  format. 

18.  Use  1  instead  of  "  for  format  and  data  statement. 

19.  No  spaces  between  format  and  open  bracket: 

OK:  FORMAT (  NOT  OK:  FORMAT  ( 

applies  to  other  statements  with  brackets  also. 

20.  Keep  computations  simple,  such  as: 

Don't  call  a  function  twice  on  same  line. 

Don’t  use  lots  of  brackets  (  )., 

etc. 
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21.  Keep  special  attention  to  IF  statements  that  include  computations, 
they  don't  always  work. 

22.  Start  all  line  numbers  in  column  1. 

23.  Code  does  not  have  to  start  in  column  7. 

24.  72  columns  usable  for  FORTRAN. 

25.  Use  X  and  Y  in  column  1  (special  compile  feature)  to  help  de-bug 
programs  with  extra  write  statements. 
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Appendix  XIII 
Diskette  Files 
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9  >. 

DRIVE  :  0  DISK  I.D.  :  MDOS 

BINEX  .CM 

LIST  .CM 

MDOSOVQ  .SY 

DIR  .CM 

MERGE  . CM 

RLGAD  . CM 

MD0S0V4  . SY 

MHOS  . SY 

ABAS I C  .CM 

MD0S0V6  .SY 

RASM  . CM 

FREE  . CM 

ROLLOUT  .CM 

EQU  .  SR 

DUMP  . CM 

EXBIN  .CM 

NAME  . CM 

MDOSOV1  .SY 

PATCH  . CM 

ASM  . CM 

BLGKEDIT.eM 

ECHO  . CM 

EDIT  .CM 

LOAD  .CM 

MD0S0V3  .SY 

MDOSER  . SY 

DEL  . CM 

CHRIN  .CM 

BACKUP  . CM 

REPAIR  .CM 

MD0S0V5  .SY 

DOSGEM  . CM 

EMCOPY  . CM 

COPY  . CM 

FORMAT  . CM 

MD0S0V2  .SY  i 

TOTAL  DIRECTORY  ENTRIES  SHOWN  :  .<33S/f24 

:  1 

DRIVE  :  1  DISK  I.D.  :  ETSGDPO 

ETARG  .CM 

ETSG  . CM 

PULSE J  .CM 

DCOM  . SA 

DELL  .SA 

DRECT  . SA 

DSKR  . SA 

F  .  SA 

MJSTARG  .SA 

RUNETSG  .CM 

DROS  .SA 

LI  .SA 

DTRI  .SA 

DPLUM  . SA 

FLARE  . CM 

SEEK.  .  CM 

RUNETSG  .SA 

TOTAL  DIRECTORY  ENTRIES  SHOWN  :  01 7/# 11 
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DRIVE  : 

1 

CKIMIT 

.  RO 

RDTCPU 

.  RO 

ALP 

.RO 

PICT 

.RO 

LDTLR 

.RO 

GRAPH 

.RO 

STSEEK 

•  RO 

PHD 

.RO 

LDDSPC 

•  RO 

DIR 

.RO 

ETLB 

.RO 

ASPGEN 

•  RO 

IRND 

.RO 

ARCTRIG 

.RO 

DFLT 

.RO 

RUNETSG 

.CM 

FTNLBX 

.RO 

LDRET 

.RO 

STTGPM 

.RO 

RUNETSG 

.RO 

LRUN 

•  CF 

LDPTTG 

.RO 

GREY 

.RO 

LBPLSJ 

.RO 

STAROS 

.RO 

LSHL 

•  RO 

RDTMP 

.RO 

STAROS 

.SA 

CLRTMP 

.RO 

VERT 

.RO 

ESYS  * 

.SA 

APICT 

.RO 

ETSGGO 

.RO 

LDTCPU 

.RO 

RDDSPC 

.RO 

AXES 

.RO 

STAOC 

.RO 

LDNTRR 

.RO 

LDASP 

.RO 

READWRIT.RO 

BOOT 

.RO 

TOTAL  DIREC 

1.8.  s  JTR1 


ENTRIES  SHOWN 


041/I29 


:  1 


DRIVE 

:  1  DISK  I.D.  s 

SEEK 

PETCL 

.SA 

LSK 

.CF 

NTP 

.RO 

8SKR 

.SA 

RETGEN 

.SA 

SEEK 

.RO 

NTR 

.SA 

SEEK 

.  cn 

SEEK 

.  .SA 

RETGEN 

•  RO 

TOTAL 

DIRECTORY  ENTRIES 

SHOWN  :  010/ $8 A 

AXIII.3 


JTF:1 


:  1 

DRIVE  :  1  DISK  I.D.  : 

CK1NIT  .RO 
RD'XPU  .  RO 
flLF*  .  RO 
FOV  . Sfl 
2S  .Sfl 

PICT  .RO 
LDTLR  . RO 
GRAPH  . RO 
STSEEK  . RO 
DIP  .RO 
PMI  .RO 
ETLB  . RO 
LDDSPC  .RO 
TRG  . Sfl 
flSPGEN  .RO 
•IRND  .RO 
flRCTRIG  .RO 
DFLT  . RO 
LDRET  . RO 
STTGPM  . RO 
RUNETSG  .RO 
LRUH  . CF 
CM  .  Sfl 

LDPTTG  .RO 
GREY  . RO 
LDPLSJ  . RO 
STflROS  . RO 
LSHL  .RO 
RDTMP  . RO 
IFLGS  .Sfl 
CLRTMP  . RO 
VERT  . RO 
flPICT  .RO 
LDTCPU  . RO 
RDDSPC  . RO 
AXES  . RO 
ETSGGO  .RO 
STflOC  . RO 
LDHTRR  . RO 
LDflSP  . RO 
RESP  . Sfl 
TOTAL  DIRECTORY  ENTRIES  SHOWN 


041/*29 


:  1 

DR  I  WE  1  DISK  I.D.  s  SCRATCH 

PUNK  .LX 

DSD  . LX 

EMT  . CM 

PUNS  . LO 

PLOT  . Sfl 

DSD  .LO 

DSD  . Sfl 

PLOT  . RO 

OLDDSD  .LO 

INTFAC  .Sfl 

INTFflCND. Sfl 

TOTAL  DIRECTORY  ENTRIES  SHOWN  *  OU'*0B 


mu.  * 


JTR2 


DRIVE  s 

1  DISK  I.D.  s 

CKINIT 

.RO 

RDTCPU 

.SA 

VERT 

.  SA 

CLRTMP 

.SA 

AXES 

.  SA 

LDTLR 

.SA 

GRAPH 

.SA 

RDDSPC 

.SA 

STflOC 

.  SA 

LDNTRR 

.SA 

CKINIT 

.SA 

PACK 

.  SA 

DIR 

.  SA 

PMD 

.SA 

LDDSPC 

.SA 

STSEEK 

.SA 

LDPTTG 

.SR 

LDPLSJ 

.  SA 

IRND 

.SA 

LDRET 

.SA 

LSHL 

•  SA 

ARCTRIG 

.  SA 

DFLT 

.  SA 

STAROS 

.SA 

STTGPM 

.  SR 

LDTCPU 

.SA 

ETSGGO 

.SA 

LDASP 

.SA 

RUNETSG 

.SA 

RDTMP 

.  SA 

ALP 

.  SR 

TOTAL  DIRECTORY  ENTRIES 

:  l 

DRIVE  : 

1  DISK  I.D.  s 

S 

.SA 

T 

.SA 

PLUM 

.SA 

T02SOI 

.SA 

T01S01 

.  SA 

T03S01 

.  SA 

TRET 

.SA 

PT 

.SA 

IELPS 

.SA 

RB 

.  SA 

SOI 

.  SA 

ITRI 

.SA 

▼  f'Trn  r»  ?  rrr-Trtpw  CMrr«TCc 

i  V  1  1  It-  tJ  A  1  .  L.  1  1  •.  I  ImI  1  MS  k  L.V 

:  1 

DRIVE  : 

1  DISK  I.D.  : 

LTG 

.CF 

PICT 

.SA 

ASPGEN 

.RO 

ET5 

.CM 

ETARG 

.RO 

ETflRG 

.SA 

ASPGEN 

.  SA 

APIC'T 

.SA 

TOTAL  DIRECTORY  ENTRIES 

SHOWN  :  031'*  IF 


FSTTST 


01£V$0C 


ETflRG 


Q08/*08 


AXZZI.5 


D I SK  I .  It 


SEEK 


1 

DRIVE  :  1 
RETCL  . S  M 
LSK  .CF 
HTR  .  P.0  . 

RETGEN  .Sfi 
SEEK  .RO 
NTR  . Sfi 
SEEK  . CM 
SEEK  .Sfi 
RETGEN  . RO 

TOTAL  DIRECTORY  ENTRIES  SHOWN  :  80S  $0* 
si 

DRIVE  :  1  DISK  I.D.  :  GRL 

LTE  .CF 

FLfiRE  . Sfi 

VfiRLIST  .Sfi 

ETSG  . CM 

PULSEJ  . CM 

PULSEJ  . RO 

ETSG  • . RO 

LP J  . CF 

ETSG  .Sfi 

FLfiRE  . CM 

PULSEJ  .Sfi 

FLfiRE  . RO 

LFLR  .CF 

TGTfiL  DIRECTORY  ENTRIES  SHOWN  :  013/fOB 


:  1 

DRIVE  :  1  DISK  I.D.  !  ET2 

FLfiRE  .Sfi 

LTE  .CF 

VfiRLIST  .Sfi 

PULSEJ  .CM 

ETSG  .CM 

PULSEJ  . RO 

ETSG  .RO 

LPJ  .CF 

ETSG  .Sfi 

PULSEJ  .Sfi 

FLfiRE  . CM 

FLfiRE  . r  > ' 


LFLR  .CF 

TOTAL  DIRECTORY  ENTRIES  SHOWN  »  013/*0D 


AZIIZ.6 


ETSGDP0 


:  1 

DRIVE  : 

1  DISK  I.D.  : 

ETSG 

.  CM 

PULSEJ 

.CM 

DCON 

.SA 

DELL 

.  SA 

ETARU 

.  CM 

DRECT 

.  SA 

F 

.SA 

DSKR 

.SA 

MJSTARG 

.SA 

RUNETSG 

.  CM 

DROS 

.  SA 

LI 

.SA 

DTRI 

.SA 

DPLUH 

.  SA 

FLARE 

.CM 

SSSS 

.SA 

SEEK 

.CM 

RUNETSG 

.SA 

TOTAL  DIRECTORY  ENTRIES 

:  1 

DRIVE  : 

1  DISK  I.D.  : 

SDASM 

.CM 

SDBCOM 

.  CM 

TMTEST 

.BA 

TEST 

.BA 

TEST 

.LX 

RUNROS 

.BA 

SUED  IT 

.CM 

SDRUN 

.CM 

TOTAL  DIRECTORY  ENTRIES 

:  1 

DRIVE  : 

1  DISK  I.D.  : 

KATE 

•  LO 

PI 

.SA 

SEEKER 

.SH 

DUBLIN 

.SA 

P2 

.SA 

PROMPROG. CM 

P3 

.SA 

TS1 

.SA 

TOTAL  DIRECTORY  ENTRIES 

:  1 

DRIVE  : 

r- 

1  DISK  I.D.  : 

T 

•  .  f 

•  SH 

abasic 

.  CM 

PLUM 

.SA 

TOTAL  DIRECTORY  ENTRIES 

SHOWN  :  01S/*12 


SDBASIC 


SHOWN  :  003' *OS 


SYSTEM 


SHOWN  :  0O3/$O8 


TARGET 


004/ t 04 


AXI1I.7 


:  1 

DRIVE  :  1  DISK  I.D.  »  ET2 

PICT  .SB 

LTG  .CF 

ETfiRG  . CM 

RSPGEM  . RO 

ETfiRG  . RG 

ETfiRG  . Sfi 

fiSPGEN  . Sfi 

flPICT  .b H 

TOTAL  DIRECTORY  ENTRIES  SHOWN  :  008- #08 


:  1 

DRIVE  I 

1  DISK  I.D.  :  NONftME 

F3 

.Sfi 

F4 

.  Sfi 

F5 

.Sfi 

RBftSIC 

.CM 

FTNLBX 

.RO 

FI 

.LX 

FI 

.LO 

FI 

.Sfi 

F2 

.Sfi 

TOTAL  DIRECTORY  ENTRIES  SHOWN  :  009/#09 


AXI1I.8 


DISTRIBUTION 
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